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About This Manual 


This manual describes work management -— what it is and how to use it and the work 
management terms. This manual will help you set up your initial work management 
environment and change work management objects to meet your needs. Other 
topics that are covered are collecting performance data, tuning your performance, 
and gathering data on who is using the system and what resources they are using. 


This manual may refer to products that are announced, but are not yet available. 


Who Should Use This Manual 


This manual is intended for the system or application programmer. 


What You Should Know 


Before using this manual, you should be familiar with general programming concepts 
and terminology, and have a general understanding of the overview of the AS/400 
system and OS/400. You should also be familiar with the display stations and 
printers you are using. 


How This Manual Is Organized 


This manual is organized as follows: 


Chapters 1 and 2 describe work management terms and how to set up and change 
your management environment to meet your needs. 


Chapter 3 describes group jobs (which allow you to start many interactive jobs at 
one work station) and Attention key handling programs. 


Chapter 4 gives examples of changing work management objects. 
Chapter 5 describes some performance guidelines to help you tune your system. 


Chapter 6 describes how to gather performance data and write an application to 
reduce the data into meaningful reports. 


Chapter 7 describes the system values and how to use them to control or change the 
overall operation of the system. 


Chapter 8 describes how to gather data to determine who is using the system and 
what resources they are using. 


The last part of this manual contains a glossary and an index. Use the glossary to 


find the meaning of an unfamiliar term. Use the index to look up a topic and to see 
on which pages the topic is covered. 
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Related Online Information 


Help for Displays 


Index Search 


The following online information is available on the AS/400 system. You can press 
the Help key a second time to see an explanation of how the online information 
works, including the index search function. 


You can press the Help key on any display to see information about the display. 
There are two types of help available: 


General 
Specific 


General help explains the purpose of the display. General help appears if you press 
the Help key when the cursor is outside the areas for which specific help is available. 


Specific help explains the field on which the cursor is positioned when you press the 
Help key. For example, it describes the choices available for a prompt. If a system 
message appears at the bottom of the display, position the cursor on the message 
and press the Help key to see information about the cause of the message and the 
appropriate action to take. 


To exit the online information, press F3 (Exit). You return to the display on which 
you pressed the Help key. 


Index search allows you to specify the words or phrases you want to see information 
about. To use index search, press the Help key, then press F11 (Search index). 


Help for Control Language Commands 


Online Education 


To see prompts for parameters for a control language command, type the command, 
then press F4 (Prompt) instead of the Enter key. 


AS/400 online education provides tutorials on a wide variety of topics. To use the 
online education, press F13 (User support) on any system menu to show the User 
Support menu. Then select the option to use online education. 


Question-and-Answer Function 


The question-and-answer (Q & A) function provides answers to questions you may 
have about using the AS/400 system. To use the Q&A function, press F13 (User 
support) on any system menu to show the User Support menu. Then select the 
option to use the question-and-answer function. 
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Related Printed Information 


You may want to refer to other AS/400 manuals for more specific information about 
a particular topic. The following is a list of the additional manuals and the informa- 
tion you may want to find in them: 


Programming: Backup and Recovery Guide, SC21-8079 


This manual provides the system programmer with information about the dif- 
ferent media available to save and protect system data as well as a description of 
how to record changes made to data base files and how that information can be 
used for system recovery and activity report information. 

Programming: Command Reference Summary, SC21-8076 


This manual provides the system operator, system programmer, or system 
administrator with quick reference information about the structure of the 
AS/400 commands. This manual contains an alphabetic list of all AS/400 com- 
mands and a list, by command, of error messages the programmer can monitor 
for when writing programs. 

Programming: Control Language Programmer's Guide, SC21-8077 


This manual provides the application programmer or system programmer with a 

wide-ranging discussion of the AS/400 programming topics, including: 

— A general discussion of objects and libraries 

— CL programming, controlling flow and communicating between programs, 
working with objects in CL programs, and creating CL programs 

— Predefined and impromptu messages and message handling 

— How to define and create user-defined commands and menus 

Programming: Control Language Reference, SBOF-0481 


This manual provides the application programmer or system programmer with a 
description of the AS/400 control language (CL) commands. Each command is 
defined, including its syntax diagram, parameters, default values, and keywords. 
Programming: Data Management Guide, SC21-9658 


This manual provides the application programmer or system programmer with 

information about managing key aspects of the system, including: 

— Qverride and copy files. 

— Describe display, printer, tape, and diskette device files to the system. 

— Spooling, job queues, spooled output files, and output queues. This includes 
information on how to create jobs and output queues. 

Programming: Performance Tools Guide, SC21-8084 


This manual provides the system programmer with information about what per- 
formance management is, gives an overview of the tools, and tells how the tools 
can be used to help manage system performance. The manual gives instructions 
on how to approach the analysis of system performance and how to do system 
performance measurement, reporting, capacity planning, and application anal- 
ysis. 

Programming: Security Concepts and Planning, SC21-8083 

This manual provides the system programmer (or someone who is assigned the 
responsibilities of a security officer) with information about general security con- 


cepts and planning for security on the system. It also includes information for 
all users about resource security. 
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e Programming: System Reference Summary, SC21-8104 


This manual provides the system operator or system programmer with quick ref- 
erence information when working with the AS/400 system. This manual con- 
tains summaries of information (summary charts, system values, and DDS 
keywords) from the AS/400 group. 

e System Operations: Operator’s Guide, SC21-8082 


This manual provides the system operator or system administrator with informa- 
tion about how to use the system unit operator panel; send and receive messages; 
respond to error messages; start and stop the system; use the display station 
function keys; control devices; and also process and manage jobs on the system. 

¢ Communications: Advanced Program-to-Program Communications and Advanced 
Peer-to-Peer Networking User’s Guide, SC21-9598 


This manual is intended for the system programmer responsible for defining or 
using advanced peer-to-peer networking (APPN), and for writing application pro- 
grams that use advanced program-to-program communications (APPC). 

¢ Communications: Asynchronous Communications Programmer’s Guide, 
SC21-9592 


This manual provides the application programmer or system programmer with 

the following information: 

— Description of asynchronous communications, including the types of com- 
munications lines and remote systems that are supported 

— Remote system generation of configuration requirements and the startup 
requirements needed for remote programs to communicate with the AS/400 
system 

— Commands used by the AS/400 program to start a communications session 

— Programming considerations for the AS/400 system and for the remote 
system 

¢ Communications: Communications and Systems Management User’s Guide (to be 
available at a later date) 


This manual provides the system operator, system programmer, or system 
administrator with information for configuring the AS/400 system to use the 
remote management support (distributed host command facility), the change 
management support (distributed systems node executive), and the problem man- 
agement support (alerts). 

¢ Communications: Distributed Data Management User’s Guide, SC21-9600 


This manual provides the application programmer or system programmer with 
information about remote file processing. It describes how to create a distrib- 
uted data management (DDM) file, how to define a remote file to AS/400 DDM, 
what file utilities are supported through DDM, and the requirements of the 
AS/400 DDM as related to other systems. 
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Communications: Distribution Services Network Administrator's Guide, 
S$C21-9588 


This manual provides the system operator or system administrator with informa- 
tion about administering data communications applications on the AS/400 
system. This guide may also be useful to a programmer who works with data 
communications functions on the AS/400 system. The reader is expected to be 
familiar with data communications concepts. The reader is also expected to use 
applicable AS/400 menus and displays or control language (CL) commands. 
Communications: Programmer’s Guide, SC21-9590 


This manual provides the application programmer with the information needed 
to write application programs that use the AS/400 communications and the 
OS/400-ICF file. It also contains examples of communications programs and 
describes return codes. 

Communications: User’s Guide, SC21-9601 


This manual provides the system operator, application programmer, system pro- 

grammer, or system administrator with the following information: 

— Communications information that is common among the AS/400 communi- 
cations support, such as: 
— Setting and changing communications values 
— Starting and stopping communications 

— Communications configuration information, such as defining lines, control- 
lers, and devices 

— Information about defining and using display station pass-through 

— Information about the 3270 remote attachment 

Communications: 3270 Device Emulation User’s Guide, SC21-9602 


This manual is intended for the display station operator and system programmer 
who use the binary synchronous communications (BSC) and system network 
architecture (SNA) 3270 device emulation. Device emulation is available for both 
displays and printers. 
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C Chapter 1. Work Management Introduction 


Work management supports the commands and internal functions necessary to 
control system operation and the daily work load on the system. In addition, work 
management contains the functions you need to distribute resources for your appli- 
cations so that your system can handle your applications. 


This chapter is divided into three main sections: 


1. “Overview of Work Management,” which gives a high-level overview of work 
management concepts and of IBM-supplied work management objects. The 
terms used in this section and the characteristics of the IBM-supplied objects are 
described in more detail in the remainder of the chapter. 


2. “Summary of Work Management Concepts and Terms” on page 1-2, which con- 
tains the main concepts and terms you must know to understand work manage- 
Cc ment. The work management functions relate closely to the basic performance 
and operating characteristics of your system. 


3. “Characteristics of the Shipped System” on page 1-7, which describes the work 
management characteristics of the system as IBM ships it to you. The shipped 
system contains objects that let you do basic system functions in a simple and 
straightforward way. 


Overview of Work Management 


Cc All the work done on the system is submitted through the work management func- 
tions. When the OS/400 is installed, it includes a work management environment 
that supports interactive, batch, and communications work, and spool processing. 
Because the work management functions can be used as they are installed, a com- 
plete understanding of the work management functions is not needed to do typical 
operations. 


The OS/400 allows you to tailor this support or to create your own work manage- 
ment environment. To do this, you need an understanding of the work management 


é concepts. 


The following paragraphs give a high-level overview of the work management con- 
cepts and the objects supplied by IBM. These concepts and objects are described in 
more detail later in this chapter. 


The basic types of jobs done on the system are interactive jobs, batch jobs, spooling 
jobs, and autostart jobs: 


e An interactive job starts when a work station user signs on at a work station and 
ends when the work station user signs off. 


e A batch job is started when the job is selected from the job queue. The job 
could have been read by a spooling reader and placed on the job queue, or it 
could have been submitted to the job queue from another job. 


A job started by a communications program start request from another machine 
( is a comimunications batch job. Job queues are not used when starting a com- 
munications batch job. 
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e Spooling functions are available for both input and output. For input spooling, 
a system program called a reader transfers jobs from an input device (diskette or 
data base file) to a job queue. For output spooling, the system places output 
records produced by a program in a spooled output file. These files are later 
written to external devices (printers or diskette) by system jobs called writers. 
Spooling jobs are started when a start reader or start writer command is speci- 
fied. The Data Management Guide contains more information on spooling. 


e Autostart jobs can be used to automatically start jobs that perform repetitive 
work or one-time initialization-type work. Autostart jobs are associated with a 
particular subsystem, and each time the subsystem is started the autostart jobs 
associated with it are started. 


On the AS/400! system, all user jobs operate in an environment called a subsystem. 
A group of jobs with common characteristics can be controlled independently of 
other jobs, if they are placed in the same subsystem. Subsystems can be easily 
started and ended as needed to support the work being done and to maintain the 
performance characteristics you desire. One subsystem, called a controlling sub- 
system, is automatically started during the initial program load (IPL). (For informa- 
tion on how to do an IPL, see the Operator's Guide.) 


To use the system, each user must sign on with their user profile name. A user 
profile is an object that represents a particular user or group of users to the OS/400 
and identifies which objects and functions the user has authority to. (The Security 
Concepts and Planning contains more information about user profiles.) 


The following are user profiles supplied by IBM that are most widely used: 


¢ QSYSOPR, which is used by the system operator 

© QPGMR, which is used by a programmer for online programming 

¢ QUSER, which is used by a work station user 

© QSECOFR, which is used by the security officer to create new user profiles for 
users and groups of users to give better control of the system 
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Figure 1-1 on page 1-3 shows the structure provided by and managed through work 
management. The referenced numbers refer to descriptions following the figure. 


1 AS/400 is a trademark of the International Business Machines Corporation. 
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The following command adds a routing entry to the subsystem description 
QGPL/ORDER. The interactive jobs started from DSP01 and DSP02 are automatically 
routed to a routing step in which program ORDLIB/ORDERPGM is first called. 


ADDRTGE SBSD(QGPL/ORDER) SEQNBR(010) CMPVAL(QCMDI) + 
PGM(ORDLIB/ORDERPGM) CLS(QGPL/ORDCLS) POOLID(2) 


The following command should be specified for any subsystem that has work station 
entries. Without it, you cannot use the Test Request key on the 5250 work stations 
allocated to the subsystem. (The Test Request key is used to start verification tests 
for a work station.) 


ADDRTGE SBSD(QGPL/ORDER) SEQNBR(900) CMPVAL(525XTEST) + 
PGM(QSYS/QARDRIVE) CLS(QGPL/QCTL) 


Note: Because the POOLID parameter was not specified, a test request job runs in 
pool | of the subsystem ORDER. This pool is defined as the base storage 
pool. 
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Work Management Displays 


The OS/400 provides commands you can use to display the contents and descriptions 
of work management objects. In addition, there are commands to display the status 
of activities in the system. You can use the following commands to monitor activity 
in the system: 


e Display Class (DSPCLS) 

e Display Job (DSPJOB) 

e Display Job Description (DSPJOBD) 

e Display Network Attributes (DSPNETA) 

e Display Spooled File (DSPSPLF) 

e Display Subsystem Description (DSPSBSD) 
e Display System Value (DSPSYSVAL) 

e Work with Active Jobs (WRKACTJOB) 

¢ Work with Job (WRKJOB) 

e Work with Job Descriptions (WRKJOBD) 
e Work with Job Queues (WRKJOBQ) 

e Work with Output Queues (WRKOUTQ) 

¢ Work with Output Queue Descriptions (WRKOUTQD) 
e Work with Readers (WRKRDR) 

e Work with Spooled Files (WRKSPLF) 

¢ Work with Submitted Jobs (WRKSBMJOB) 
e Work with Subsystems (WRKSBS) 

e Work with Subsystem Descriptions (WRKSBSD) 
¢ Work with Subsystem Jobs (WRKSBSJOB) 
¢ Work with System Status (WRKSYSSTS) 

¢ Work with User Jobs (WRKUSRJOB) 

¢ Work with Writers (WRKWTR) 


For a description of how to use the system status display and the active jobs display, 
see Chapter 5, “Performance Guidelines.” For a detailed description of the other 
commands, displays, and their use, see the CL Reference and the Operator’s Guide. 
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C Security Considerations with Job Descriptions 


Every job in the system operates under a job description. This controls the various 
attributes of a job. The USER parameter controls the name of the user profile that 
will be assigned to the job. There are several considerations to this parameter. 


Interactive Jobs 
The job description to be used is defined on the ADDWSE (Add Work Station Entry) 
command. The default is to use the job description specified in the user profile. If 
USER (*RQD) is specified in the job description, the user must enter a user name. If 
USER(XXXX) is entered (where XXXX is a specific user profile name), the user is 
allowed to press the Enter key on the Sign On display and operate under the Xxxx 
user profile name. 


Batch Jobs 
( The job description used for batch jobs is specified on the BCHJOB or Submit Job 
(SBMJOB) command. 


If an input stream is entered containing BCHJOB commands, the user entering the 
STRXXXRDR or SBMXXXJOB command must have operational authority to the job 
description specified. When an input stream is used, jobs always operate under the 
user profile of the job description and not of the user who is placing the jobs on the 
job queue. If USER(*RQD) is specified in the job description, it is invalid to use the 
job description on a BCHJOB command. 


Cc If a SBMJOB command is used, the command defaults so that the batch job will 
operate under the user profile name of the submitter. However, if USER(*JOBD) is 
specified on the SBMJOB command, the job operates under the name in the job 
description. The submitter can specify USER(*JOBD) only if they have *CHANGE 
authority to the job description. (No authority is needed to the actual user profile.) 


Frequently, a specific name in the job description is required in order to let users 
submit work for a specific user profile. For example, the QBATCH job description is 
shipped with USER(QPGMR) to allow this. This job description is created normally 
(the public is given *CHANGE authority). This means that any user on the system 

Cc who has authority to the SBMJOB, STRXXXRDR, or SBMXXXJOB command can submit 
work under the QPGMR user profile. You may want to change the QBATCH job 
description depending on your security needs. 


Security Concepts and Planning contains information on how to submit and use 
adopted authority. 
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Autostart Jobs 
The job description used for an autostart job is specified on the ADDAJE (Add 
Autostart Job Entry) command. When the subsystem is started, the job operates 
under the user profile name in the job description, not under the name of the user 
who entered the ADDAJE command. Because the job description is located by quali- 
fied name at subsystem start time, you may want to control access to the job 
description. If USER(*RQD) is specified in the job description, it is invalid to use the 
job description for an autostart job. 


Communications 
The job description used for communications jobs is specified on the Add Communi- 
cations Entry (ADDCMNE) command. It operates similarly to autostart jobs. 


The ADDWSE, ADDAJE, ADDCMNE, and the corresponding CHGXXX commands 
require the user of the command to have *CHANGE authority to any job description 
named. It is valid to use these commands and name a job description that is not in 
existence at the time the command is entered. However, the job description name 
and library are set at that time. 


Job Description Authority 
To create a job description with a specific user name requires the user of the 
CRTJOBD or CHGJOBD (Create Job Description or Change Job Description) 
command to have *CHANGE authority to the user profile. 


Periodically you may want to: 


¢ Review all the ADDWSE commands and the job descriptions being used for inter- 
active jobs to ensure that whenever job descriptions with specific names are used, 
they meet your security requirements. 


¢ Review all your job descriptions that have a specific name in the USER parameter 
to determine if the authorizations to these job descriptions are meeting your 
security requirements. (If the job descriptions with specific names have public 
authority, then anyone can use them.) If you have security-sensitive job 
descriptions, you may want to place these in privately authorized libraries to 
help restrict their use. 


e Review the authorization to user profiles to ensure that any object operational 
authorizations are consistent with your security requirements. 
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S Chapter 3. Group Jobs and Attention Key Handling Programs 


This chapter describes how to start many interactive jobs at one work station using 
group job support. How to start, handle, and end group jobs is described along with 
a sample application for group jobs. This chapter also describes Attention key han- 
dling programs which allow you to go quickly from one group job to another. 


Concepts for Group Jobs 


Group jobs support allows a user to start up to 32 interactive jobs at one work 

station. At any one time, only one group job can be active; the others are sus- 

pended. The group jobs are similar to secondary interactive jobs requested by 

pressing the System Request key; however, up to 16 group jobs can be started for 

each sign on at a work station (32 total when there is a secondary interactive job) 
Cc and the application program can handle interruptions more flexibly. 


Group Job 16 
Group Job... 
Group Job 2 
Group Job 1 


CHGGRPA 
Command 


Nongroup 
Interactive 
Job 


Display 
Station 


P7730019-1 


Ss Attention key handling support makes it easy for the user to transfer control from 
one group job to another quickly, without ending one job to go to the other. To 
transfer control from one group job to another, the user presses the Attention key, 
and an Attention key handling program can either present a menu (from which the 
user chooses a group job) or immediately transfer the user to another group job. 
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The major advantages of group jobs are the following: 


e The work station user can press the Attention key to interrupt work in one inter- 


active group job, change to any of several other interactive group jobs, and 
return to the original group job quickly. 


The Attention key is made valid by the Set Attention Program (SETATNPGM) 
command and can be used independently of group jobs. 


Group jobs can give a significant performance advantage over alternative 
methods. If an Attention key handling menu is used to handle normal inter- 
ruptions, the environment for processing these interruptions can be built on first 
use and then suspended. When a request is repeated, the function can be called 
with all files open and the proper screen displayed. This allows the process 
access group (PAG) for each function to be a minimum size, and the work station 
user does not have to exit a function to get to a menu from which to select 
another function. 


Using group jobs with display station pass-through provides a convenient and 
fast way to change among many interactive jobs on many different systems in a 
network. See the Communications Programmer’s Guide for more information on 
display station pass-through. 


The important concepts to understand about group jobs are: 


Group jobs apply only to interactive jobs. 


Up to 16 group jobs can exist in one group (16 more are available if the user 
transfers to a secondary interactive job). 


Group jobs are unique to a user (they are not shared by multiple users). 
Only one group job at a time is active (the others are suspended). 


Each group job is independent and has its own job log, spooled files, library 
QTEMP, and so forth. 


A group job is called by the Transfer to Group Job (TFRGRPJOB) command. 
This command is typically run from a user written menu program, which 1s 
called by pressing the Attention key (the SETATNPGM command must have been 
previously run). 


There is a 512-byte group data area that can be used to pass data between one 
group job and another. This group data area 1s implicitly created by the Change 
Group Attributes (CHGGRPA) command. The CL Programmer’s Guide contains 
more information on group data areas. 
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Starting, Handling, and Ending Group Jobs 


When working with group jobs, you can use the following commands: 


¢ The CHGGRPA command changes your nongroup job to a group job and 
switches a group job back to a nongroup job (if it is the only job in the group). 


e The TFRGRPJOB command switches from one group job to another group job in 
the same group and creates new group jobs. After each use of the TFRGRPJOB 
command, the SETATNPGM command must be used to set the Attention key on, 
if desired. 


¢ The ENDGRPJOB command ends one group job in a group. 


¢ The CHKRCDLCK command checks if the job has any record locks before trans- 
ferring to another group job while you are in an update operation. 


¢ The SIGNOFF command ends all group jobs in the group. 


The CHGGRPA command identifies the current job as a group job and gives it a 
group job name to uniquely identify it in the group. (At this point the group has 
only one group job.) Each group job is unique for a user. Two different users do 
not share the same group job. When a job Is designated as a group job, it then has 
the capability to call a new group job. There are also restrictions on group jobs 
(such as RRTJOB, TFRJOB may not be used). When there is only one active job in the 
group, that job can become a nongroup job. 


To allow group jobs to communicate with each other, a special 512-byte data area 
called a group data area is automatically created when a job becomes a group job. 
The group data area can only be accessed by jobs in the group by using the special 
value *GDA. 


The use of group jobs does not require an Attention key menu approach as 


described in this section. A group job can be called from any application program 
or by the GRPJOB(*SELECT) parameter on the TFRGRPJOB command. 
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Relationship of Group Jobs to a Secondary Interactive Job 
The following shows the relationship of group jobs to a secondary interactive job. 


System Request Option 1 
or TFRSECJOB Command 


Group Job 16 
Group Job ... 
Group Job 2 
Group Job 1 


Group Job 16 
Group Job ... 
Group Job 2 


Group Job 1 


Display 
Station 
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In this case, the CHGGRPA command is run twice, once for each interactive job. 


The Group Job function is similar to the System Request function in that there is 
only one job active at a time while the others are suspended. Group jobs differ from 
system request in the following: 


e Starting a group job does not require signing on. The same user profile and 
environment is used. 


e Up to 16 group jobs can exist at any one time. The user must select which 
group job to transfer to, whereas using system request permits the user to 
transfer between only two jobs. Normally in group jobs, a menu reached by 
pressing the Attention key allows the user to select which group job to transfer 
to. It is possible to use group jobs together with system request for a total of 32 
group jobs available for a single user. However, these 32 jobs are in two sepa- 
rate groups, each group having its own group data area and other group attri- 
butes. 


e The System Request function allows the work station user to suspend a job 
while the keyboard is locked and application functions are in progress. This can 
interrupt a logical sequence of events. For example, records may be left locked. 
In contrast, the Attention key is active only when the keyboard is unlocked for 
input. Also, the application can control when the Attention key is active, and 
prevent its use at inappropriate times. The System Request function is always 
available if the work station user has authority to it. 
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Sample Application for Group Jobs 


To understand the group job concept, assume a work station user is given a Main 
Menu with the following options: 


MAIN MENU 


1. Post cash 
Inquire into customer master file 
Inquire into accounts receivable file 


2. 
3. 


Option: 


F12=Previous 


The work station user selects option 1 (Post cash) to start entering payments into the 
file. While the work station user is entering data, he receives a telephone call 
requesting information that can be answered using option 2 (Inquire into customer 
master file). 


There are several methods of handling such an interruption: 


Have the work station user end the Post cash function, return to the Main 
Menu, and select the Inquiry function. When done with the inquiry, the work 
station user returns to the Main Menu, selects the Post cash function and con- 
tinues. This requires system interactions each time the work station user selects 
a different function and may require additional system resources for opening and 
closing files. 


Code the inquiry function as part of the Post cash function. This method is 
usually done by specifying that a command function key be enabled to request 
the inquiry. This can be awkward if the same Inquiry function must be accessed 
from multiple programs. 


Press the System Request key and start a secondary interactive job. This can be 
a good solution if the the work station user uses only one function during an 
interruption. However, if several functions are used, this solution can become 
awkward. 


Use the group job approach as shown in the following example: 
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Main Program 


CHGGRPA GRPJOB(CASH) 
SETATNPGM PGM(ATTNPGM) 
SNDRCVF 


1. Post Cash 
2. Inq Cust 


IF (&OPTION *EQ 1) 


CALL POSTCASH 


" (ROPTION “EO 3) POSTCASH Program 


TFRGRPJOB 
GRPJOB(ARINQ) 
INLGRPPGM(ARINQC) 


ATTNPGM Program 


RTVGRPA GRPJOB(&GRP) 1. Post Cash 


SNDRGYE 2. Inq Cust 
3. Inq A/R 
; Option 2 a 
IF (OPTION *EQ 2) DO 


IF (GRP “EQ ‘CUSINQ’) 
RETURN 

ELSE TFRGRPJOB 
GRPJOB(CUSINQ) 
INLGRPPGM(CUSINQC) 

RETURN 

ENDDO 


Group Job CASH 


Group Job CUSINQ CUSINQC Program 
SETATNPGM PGM(ATTNPGM) 
10 CALL CUSINQ — 
CUSINQ Program 
of = 
12) Attention 
Key 


Customer 
Master 
Inquiry 


ATTNPGM Program 


RTVGRPA GRPNAM(&GRP) 
SNDRCVF 


1. Post Cash 


2. Inq Cust 


IF (OPTION *EQ 1) DO Option: ty) Sed Ayers 


IF (&GRP *EQ ’CASH’) 
RETURN 

ELSE TFRGRPJOB 
GRPJOB(CASH) 

RETURN 

ENDDO 


P7730002-3 
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The following steps illustrate how the sample application works: 


The Change Group Attributes (CHGGRPA) command changes the current 
nongroup interactive job to a group job named CASH. 


The Set Attention Program (SETATNPGM) command specifies that the 
system should recognize the Attention key and call the ATTNPGM 
program when the Attention key is pressed. 


The SNDRCVF command displays a menu from which the work station 
user selects functions to work on. In this case, the work station user 
selects option 1 (Post cash). 


The main program calls the POSTCASH program, and the work station 
user starts posting cash transactions. 


Note: The main program runs a CALL command to the post cash 
program and a TFRGRPJOB command to the other functions. This 
allows the main job to always be known as CASH, but other tech- 
niques can be used. If the work station user chooses to end one of 
the group jobs other than CASH (instead of pressing the Attention 
key to suspend it), the system automatically returns to the previ- 
ously active group job. 


To change from posting cash, the work station user presses the Attention 
key. The system saves the current contents of the display and calls the 
Attention key handling program (ATTNPGM). 


The Attention key handling program (ATTNPGM) is written to be used by 
any of the jobs in this group. The program retrieves the current group 
job name using the Retrieve Group Attributes (RTVGRPA) command. 


The Attention key handling program displays a menu from which the 
work station user can select a function. The menu can contain any 
options, but in this example, the options are the same as those shown on 
the Main Menu. The work station user selects option 2 (Inquire into 
customer master file). 


If the option is for the current group job (for option 2 this is CUSINQ), 
the program returns to the current group job. For example, assume the 
operator posting cash pressed the Attention key, then decided not to 
change group jobs and continue posting cash. Instead of transferring to 
a group job, only the RETURN command is needed. 


If the option is for a different group job, the program runs a TFRGRPJOB 
command to suspend the current job and activate a new group job and 
program. For option 2, the TFRGRPJOB command specifies the name of 
the group job to be started (in this example, CUSINQ), and which 
program to call (CUSINQC program). 


The group job CUSINQ is activated and the initial group program 
(CUSINQC) is called. The job has already been identified as a group job 
by the TFRGRPJOB command; therefore the CHGGRPA command is not 
needed. This group job also uses the SETATNPGM command to allow for 
an interruption. The same program (ATTNPGM) is used, but it runs ina 
different group job. 
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The work station user inquires into the customer master file and 1s now 
ready to return to the post cash function. 


The work station user again presses the Attention key. The system saves 
the current contents of the display and calls the Attention key handling 
program (ATTNPGM). The user sees the same Attention Handling menu, 
but is in a different group job. 


The work station user selects option 1 (Post cash). 
Because the name of the current group job is CUSINQ (not CASH), the 


TFRGRPJOB command is run to transfer to the CASH group job. 


In this instance, the group job is already active but suspended; therefore 
the system resumes the suspended group job. The ATTNPGM program is 
continued at the next instruction following the TFRGRPJOB command that 
was run in step 9. This causes a return to the POSTCASH program. 


The previous display (which the system saved when the work station user 
pressed the Attention key in step 5) is restored, and the work station user 
continues posting cash transactions where he left off. 


If the work station user wants to inquire into the customer master file again, he 
would again press the Attention key and receive the attention handling menu. 
Because the group job would already be active, the system would resume the job 
where it was suspended (that is, at the instruction following the TFRGRPJOB 
command in step 14). This return causes a return to the CUSINQ program where it 
was interrupted when the work station user pressed the Attention key in step 12. 


If the work station user wants to inquire into the accounts receivable file, the same 
set of steps occurs. However, the work station user does not have to return to the 
post cash function first. The attention handling menu allows him to select any of 
the functions in any sequence. Note that the work station user cannot start two 
group jobs with the same group job name. If the job specified a group job name 
that is already active, control is passed to that job (no new group job is started) and 
the initial group program parameter is ignored. It is also possible to have several 
group jobs (having unique names) all doing the same function. 


The Attention key cannot be pressed until the program requests input from the work 
station. This allows the program to prevent an interruption during certain functions; 
for example, when records are locked. See “Designing an Attention Key Handling 
Program” on page 3-13 later in this chapter. 


When the Attention key is pressed, the system saves the current display. The current 
display is not saved when a TFRGRPJOB command is run. 


The complete listing for this example is shown later in this chapter. 
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Cc Effect of Call Level on Attention Key Status 


You can use the Set Attention Program (SETATNPGM) command with SET(*ON) spec- 
ified to identify a program as the Attention key handling program at that call level 
in the job running the command. When the Attention key is pressed, the running 
job is interrupted, the display is saved, and the Attention key handling program is 
called. No parameters are passed to the Attention key handling program when it is 
called. 


The Attention key handling program runs in the same job and has the same job 
attributes, overrides, and group authorities as the program that issued the 
SETATNPGM command. However, program-adopted authority is not propagated 
from the program that was interrupted. 


The SETATNPGM command is call-oriented. That is, a SETATNPGM command issued 
at one call level causes the Attention key handling program to be in effect at the 

'S current call level as well as deeper call levels, until another SETATNPGM command is 
run to change the Attention key handling program or Attention key status. When- 
ever a program that issued a SETATNPGM command returns, the display is restored 
and the Attention key handling program and Attention key status are reset to what 
they were before the current call. If a Transfer Control (TRFCTL) command is used 
instead of a RETURN command, the status is not reset until the program that was 
transferred to returns. 


You may also specify an Attention key handling program in the user profile. The 
Security Concepts and Planning contains information on this. 


Chapter 3. Group Jobs and Attention Key Handling Programs 3-9 


The following figure illustrates the use of the SETATNPGM command at different call 
levels: 


PGM1 
ER) SETATNPGM PGM(A) 


Fa) CALL Pem2 PGM2 


SETATNPGM PGM(B) 


| CALL PGM3 
RETURN 


PGM3 
SETATNPGM PGM(C) 


SETATNPGM PGM(D) 


SETATNPGM PGM(*CURRENT) + 
SET(*OFF) 


SETATNPGM PGM(*CURRENT) + 
SET(*ON) 


SETATNPGM PGM(*PRVINVLVL) 


RETURN 


P7730021 -0 


PGMI issues a SETATNPGM command which causes program A to become 
the Attention key handling program. 

PGMI then calls PGM2. Program A continues to be the Attention key 
handling program until step 3. 

Another SETATNPGM command causes program B to become the current 


Attention key handling program. 


After returning from PGM2, program A again becomes the Attention key 
handling program. 


PGMI calls PGM3. 


oo & 


The first SETATNPGM command issued in PGM3 changes the Attention key 
handling program from program A to program C. 


=) 


The second SETATNPGM command issued in PGM3 changes the Attention 
key handling program to program D. 
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8 | Specifying SETATNPGM PGM(*CURRENT) SET(*OFF) causes no program to 
be called when the Attention key is pressed. This allows the program to 
complete a series of interactions with the work station user without being 
interrupted by the Attention key. 


9 | Specifying SETATNPGM PGM(*CURRENT) SET(*ON) causes program D to be 
called when the Attention key is pressed. 


The Attention key handling program that was in effect at the previous 
recursion level goes into effect, that is, program A becomes the Attention 
key handling program again and the Attention key is set to *ON. 


When PGM3 returns, program A continues to be the Attention key han- 
dling program. 


Conditions for Using the Attention Key 
In normal work station use, the Attention key can be pressed only when the key- 
board is unlocked; that is, the program is ready for input. This occurs when a read 
or write-read operation is issued or the UNLOCK DDS keyword is used in a write 
operation. The use of the Attention key differs from that of the System Request key 
in that the application program has control over when it can be interrupted. 


An exception to this occurs with application programs performing a get-no-wait 
operation on multiple device files. Pressing the Attention key causes these programs 
to be interrupted at any point by the Attention key handling program. (Even 
though the input inhibited light may be on, the keyboard is unlocked during a get- 
no-wait operation.) Application programs performing sensitive functions (especially 
during a get-no-wait operation) should therefore be protected by running 
SETATNPGM PGM(*CURRENT) SET(*OFF) before and SETATNPGM PGM(*CURRENT) 
SET(*ON) after sensitive code. 


Note: A high-level language program can use the SETATNPGM command by calling 
QCMDEXC. 


The Attention key cannot be used to call an Attention key handling program when 
the following conditions exist: 


¢ The keyboard is locked. (Note the exception described earlier for get-no-wait 
operations.) 

e The System Request menu or any of its options is being used. 

e The display message display is shown. 

e The OS/400 is already calling the Attention key handling program which makes 
it already active, however, if the program issues another SETATNPGM, the atten- 
tion key will be enabled. 

e A BASIC session is in progress, or a BASIC program is called. 


Note: In a BASIC session, the Attention key is handled by BASIC, as appropriate. 
For example, if a BASIC program is called after a SETATNPGM command has 
set the Attention key on, the Attention key is handled by BASIc. After the 
BASIC program ends, your Attention key handling program takes effect again. 
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Guidelines for Coding Attention Handling Programs 
Caution is necessary when defining an Attention key handling program because the 
Attention key handling program runs in the same job as the program that is in 
progress when the Attention key is pressed. Therefore, the interrupted program is 
not protected by any locks it held. If the interrupted program got an exclusive lock 
on an object, the Attention key program, because it runs in the same job, will be 
part of the job that has the exclusive lock. 


The following guidelines are recommended for defining Attention key handling pro- 
grams: 


e Use simple functions such as menus that allow the work station user to transfer 
to another group job or to a secondary interactive job. 


e Avoid referring to objects or functions that may be in use when the Attention 
key is pressed. 


e Avoid calling nonrecursive functions when the Attention key is pressed. 
Nonrecursive functions are functions that cannot be interrupted, then called 
again. Many functions, such as high-level language programs and utilities like 
DFU, are nonrecursive. 


e Avoid giving an option that allows the work station user to display the 
command entry display as part of the current job. For users who are program- 
mers, it is meaningful to display a menu that includes an option for the 
command entry display. The command entry display should be specified as a 
separate group job (for example, by specifying INLGRPPGM(QCL) on the 
TFRGRPJOB command). This avoids re-using objects already in use. 


e Attention key handling programs do not have the authority adopted by the 
program that was in progress before the Attention key was pressed. 


e Be aware that a read-from-invited devices operation could time-out during the 
time that the Attention key handling program is running. Therefore, if a 
time-out were to complete in the program in progress while the Attention key 
handling program is running, whatever action taken as a result of that time-out 
will occur on return to the program in progress. 


For example, if the WAITRCD value in the file was set to 60 seconds and the 
program is set to exit if a key is not pressed in one minute, and the Attention 
key program is called and runs longer than that minute, the program will exit on 
return from the Attention key handler. 


However, caution should be used, since a check for available data is made before 
checking that the time-out has completed. If a key is pressed immediately after 
leaving the Attention key handler, data could be available that could complete 
the read-from-invited devices and the time-out would not be checked. This 
could cause unexpected results. 
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Designing an Attention Key Handling Program 
There are essentially three approaches to designing an Attention key handling menu: 


e Fixed menu. The Attention key handling program allows only a fixed set of 
options. 

e Dynamic menu. The work station user determines the options. 

¢ Combination approach. The work station user selects from a fixed set of 
options and can dynamically select additional group jobs. 


Fixed Menu 
This is the method used in the example earlier in this chapter. In that example, the 
user can only select from the options on the menu. 


A menu is displayed to the work station user with the following options: 


MAIN MENU 


1. Post cash 
2. Inquire into customer master file 
3. Inquire into accounts receivable file 


Option: _ 


F12=Previous 


The program that displays the menu is coded as follows: 


PGM /* First program */ 

DCLF MAIND 

CHGGRPA GRPJOB(CASH) TEXT('Post cash') 

SETATNPGM PGM(ATTNPGM) 

LOOP: SNDRCVF 

IF (&IN91 *EQ '1') RETURN /* Fl12 */ 

IF (ROPTION *EQ 1) CALL POSTCASH 

IF (QOPTION *EQ 2) TFRGRPJOB GRPJOB(CUSINQ) + 
INLGRPPGM(CUSINQC) + 
TEXT('Customer inquiry') 

IF (ROPTION *EQ 3) TFRGRPJOB GRPJOB(ACRINQ) + 
INLGRPPGM(ACRINQC) + 
TEXT('Accounts Receivable inquiry') 

GOTO LOOP 

ENDPGM 
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In this example, the CHGGRPA command changes the current job into a group job. 
The SETATNPGM command specifies that the Attention key is allowed, and it speci- 
fies the Attention key handling program to be called (ATTNPGM). Because this 
program will display a menu, it is called an Attention key menu program. If the 
work station user selects option 1 (Post cash), the program POSTCASH is called. 


If another option is specified, a TFRGRPJOB command, which names the group job, is 
used. The system determines if the group job already exists. If it does not, the 
group job is started and the initial group program is used. If the group job already 
exists, the system transfers to that group job at the point where it was previously 
suspended. That is, it transfers to the next instruction following the TFRGRPJOB 
command that caused a transfer back to the CASH group job. The program loops 
back to the SNDRCVF command to redisplay the menu if control is ever transferred 
back to CASH. 


When the work station user presses the Attention key, the Attention key menu 
program (ATTNNMU) is called. The display may differ from the initial menu, but in 
this example, they have the same options. Only the title differs to help the user iden- 
tify the function he is using. 


ATTENTION KEY MENU 


. Post cash 
. Inquire into customer master file 
. Inquire into accounts receivable file 


Option 


F12=Previous 
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The Attention key menu program (ATTNPGM) is coded as follows: 


PGM /* Attention key menu program */ 
DCLF ATTNMNUD 

DCL &GRP *CHAR LEN(10) 

CHKRCDLCK 


MONMSG MSGID(CPF321F) EXEC(DO) 
SNDPGMMSG MSG('Attention not allowed. Complete transaction') 
RETURN 


ENDDO 
RTVGRPA GRPJOB(&GRP) /* Retrieve group name */ 
SNDRCVF 
IF (&IN91 *EQ '1') RETURN /* Fl2 */ 
IF (80PTION *EQ 1) DO /* Post cash */ 
IF (&GRP *EQ 'CASH') RETURN 
ELSE TFRGRPJOB GRPJOB(CASH) 
ENDDO 
IF (OPTION *EQ 2) DO /* Cust inquiry */ 
IF (&GRP *EQ 'CUSINQ') RETURN 
ELSE TFRGRPJOB GRPJOB(CUSINQ) + 
INLGRPPGM(CUSINQC) + 
TEXT('Customer inquiry') 
ENDDO 
IF (ROPTION *EQ 3) DO /* Acct rec inquiry */ 
IF (&GRP *EQ 'ACRINQ') RETURN 
ELSE TFRGRPJOB GRPJOB(ACRINQ) + 
INLGRPPGM(ACRINQC) + 
TEXT('Accounts Receivable inquiry') 
ENDDO 
ENDPGM 
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The Attention key menu program may differ for any group job, but in this case the 
same program is used for all group jobs. Because the work station user may press 
the Attention key, then request the same function that was interrupted, the program 
retrieves the current group job name and compares it to the group job name for the 
option that was selected. If they are the same, a RETURN command is issued. This 
means that the work station user was in a function, pressed the Attention key, then 
decided to continue the function. If the names differ, the work station user is 
requesting a different group job and the TFRGRPJOB command is used. The system 
determines if the group job is already active; if it is not, the system starts the group 
job and calls the initial program. If the group job is already active, the system trans- 
fers to where it left off. Note that the CASH group job was originally made active 
and therefore the INLGRPPGM parameter is not needed. 


When a group job is started, the system automatically establishes much of the envi- 
ronment by using the attributes from the transferring group job. Thus functions 
such as the library list and the logging level need not be set if the same values are 
desired. If however, the new group job also requires the use of the Attention key, it 
must be specified on a SETATNPGM command. For example, the initial program for 
the CUSINQ group job is CUSINQC as follows: 


PGM /* CUSINQC program */ 
SETATNPGM PGM(ATTNPGM) 

CALL CUSINQ 

ENDPGM 


In the previous example, the same Attention key menu program is specified and then 
the processing program (CUSINQ) is called. If the work station user ends the CUSINQ 
program, the CUSINQC program also ends, and the system automatically ends the 
group job and transfers back to the group job that was previously active. It would 
be possible to issue a TFRGRPJOB GRPJOB(*PRV) after the CALL and then a GOTO to 
repeat the CALL command. This will keep the group job in a suspended state. This 
decreases the time necessary to transfer to this job on the next call of the CUSINQ 
option. 
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Dynamic Menu 


In this case the Attention key menu program runs the TFRGRPJOB command with 
GRPJOB(*SELECT) specified. This provides a display of the current group jobs and 
allows the work station user to transfer to any group job. Thus the work station 
user can decide what functions are needed. This approach can be useful for pro- 
grammers because it allows them to call several group jobs and to specify what 
command should be run. 


For example, assume that the work station user specifies the following commands or 
runs them as part of a standard setup program: 


CHGGRPA GRPJOB(NORMAL) TEXT('Normal job') 
SETATNPGM PGM(MENU1) 


Program MENU! would be coded as: 


PGM 
TFRGRPJOB GRPJOB(*SELECT) 
ENDPGM 


Assume the work station user is working in the CASH group job, with two other 
group jobs suspended. If the work station user presses the Attention key, the display 
would appear as follows: 


Transfer to Group Job 


System: |= XXXXXXXX 
Post cash 


Type option, press Enter. 
l=Transfer group job 


Opt Group Job Text 
ACRINQ Accounts receivable inquiry 
CUSINQ Customer inquiry 


Bottom 
F3=Exit F5=Refresh F6=Start a new group job  Fl2=Previous 
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The work station user could then press the F6 key to enter a TFRGRPJOB command 
with prompting. When the TFRGRPJOB prompt is displayed, the work station user 
could specify a GRPJOB parameter value and either of the following for the 
INLGRPPGM parameter: 


¢ QCMD, that would display the initial menu. 

e A standard program that would build the environment the work station user 
wants and specify the same Attention key handling program. For example, 
assume the work station user specified the command: 


TFRGRPJOB GRPJOB(PGMMNU) INLGRPPGM(PGMMNUC) TEXT('Programmer Menu') 


The PGMMNUC program could be coded as follows: 


SETATNPGM PGM(MENU1) 
STRPGMMNU....... 


The work station user can now use the programmer menu. If the Attention key is 
pressed again, the display would show: 


Transfer to Group Job 


System: = XXXXXXXX 
PGMMNU 
Programmer menu 


Type option, press Enter. 
l=Transfer group job 


Group Job Text 

CASH Post cash 

ACRINQ Accounts receivable inquiry 
CUSINQ Customer inquiry 


Bottom 
F3=Exit F5=Refresh F6=Start a new group job F12=Previous 


On this display, the jobs are shown in the order they were called. 


Thus each group job that is already started can be easily called again, and the work 
station user can continue to add group jobs as required. 
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Combination Approach 
This approach allows the following variations: 


e The work station user can select from a fixed set of menu options. One option 
allows the work station user to prompt for the TFRGRPJOB command. The user 
could then specify the group job required or could specify GRPJOB(*SELECT) to 
receive a display of the currently active group jobs. Ifa user written menu is 
displayed, an input field on the menu for the group job name could also be con- 
sidered. A modification of this is for the Attention key menu program to extract 
the active group jobs using RTVGRPA command and dynamically build the menu 
choices (including the standard choices). 


e The work station user can select a menu option to activate a standard set of 
group jobs. Then, when the user presses the Attention key, the Attention key 
program runs the TFRGRPJOB command with GRPJOB(*SELECT) specified. This 
would display all the standard programs and allow the user to add group jobs. 


The following section illustrates the second variation. 


An Approach for Programmers 
For programmers, you may want to set up several standard group jobs that are acti- 
vated at sign on. The programmer can add additional group jobs if necessary. In 
the following example, the programmer has the following standard group jobs: 


Description Group Job Name 
Main group job MAIN 

Second programmer menu PGMMNU2 
Command entry CMDENTI 


AS/400 Office word pro- STRWPI1 
cessing function 
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In this approach, each programmer has a unique initial program. The following 
shows an initial program for a programmer named SMITH: 


PGM 
EG CHGLIBL LIBL(SMITH QGPL QPDA QTEMP QIDU) 
CHGGRPA GRPJOB(MAIN) TEXT('Main group job') 


CHGDTAARA DTAARA(*GDA) VALUE('STRPGMMNU SRCLIB(SMITH) + 
OBJLIB(SMITH) JOBD(SMITH) ') 

TFRGRPJOB GRPJOB(PGMMNU2) INLGRPPGM(STDGRPC) + 
TEXT('Programmer Menu # 2') 

CHGDTAARA DTAARA(*GDA) VALUE('CALL QCL') 

TFRGRPJOB GRPJOB(CMDENT1) INLGRPPGM(STDGRPC) + 
TEXT('Command entry # 1') 

CHGDTAARA DTAARA(*GDA) VALUE('WRKPDMMBR FILE(SMITH/SMITH) ') 

TFRGRPJOB GRPJOB(STRWP) INLGRPPGM(STDGRPC) + 
TEXT('Display Write # 1') 

E] SETATNPGM PGM(ATTNPGM) 


LOOP: STRPGMMNU OBJLIB(SMITH) SRCLIB(SMITH) JOBD(SMITH) 
MONMSG MSGID(CPF2320) /* F3 from Pgmrs Menu */ 
GOTO LOOP 
ENDPGM 


RSLS869-3 


This program does the following: 
Establishes the environment (for example, library list). 


Calls the standard group jobs (three group jobs plus the main group job 
are shown here). The group job data area is used to pass the command 
to be run. For each group job except the initial one, the same initial 
program (STDGRPC) is used. 


The SETATNPGM command sets the Attention key on and establishes the 
ATTNPGM program as the standard Attention key handling program. 
When the Attention key is pressed, the TFRGRPJOB command with 
GRPJOB(*SELECT) specified displays the group job selection display. 
From this display, the programmer can change and add additional group 
jobs. 


Note: To add another standard group job requires only two additional commands 
be added to the initial program and no changes to the other programs. With 
this approach the group jobs would be started at sign on and would not be 
ended unless the user signed off or entered the ENDGRPJOB command. 
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LOOP : 


The initial program (STDGRPC) for the group jobs other than the main group job is 
as follows: 


PGM 
DCL 
ER RTVDTAARA 
TFRGRPJOB 
SETATNPGM 
Ey CALL 
MONMSG 
TFRGRPJOB 
GOTO 
ENDPGM 


VAR(&CMD) TYPE(*CHAR) LEN(512) 
DTAARA(*GDA) RTNVAR(&CMD) 

GRPJOB (*PRV) 

PGM (ATTNPGM) 

QCMDEXC (&CMD 512) 

MSGID(CPF2320) /* F3 from Pgmrs Menu */ 
GRPJOB (*PRV) 

LOOP 


RSLS870-0 


When the group job is started, it does the following: 


Retrieves the group data area, which contains the command to be run. 
The command is not run immediately, but is stored in a variable in the 
program. The program returns to the previous group job. The user does 
not see any displays, but would notice the overhead to build the group 
job. Assume at a later point the user selects the group job SRTWP!1 from 
the Group Jobs Selection menu. The user will transfer to the STRWP! 
group job. Because it is already active, it continues with the instruction 
following the TFRGRPJOB command. 


The SETATNPGM command sets the Attention key on and establishes the 
ATTNPGM program as the Attention key handling program. 


The program calls the QCMDEXC program and passes variable &CMD, 
which contains the SRTWP command (see the initial program shown 
earlier). To exit the AS/400 Office word processing function, the pro- 
grammer can do either of the following: 


Press the Attention key and receive the Group Jobs Selection menu. This allows 
the programmer to transfer to an existing group job or start a new group job. 


Press the Exit key from the AS/400 Office word processing function primary 
menu. This returns to program STDGRPC, which transfers back to the previous 
group job. 


Note: Pressing the Exit key does not end the SRTWP!1 group job. If the STRWP! 
group job is again activated, the program returns to the next instruction, 
which loops back and runs the STRWP command again by calling 
QCMDEXC. 
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The Attention key handling program (ATTNPGM) would be coded as follows: 


PGM 

TFRGRPJOB GRPJOB(*SELECT) 

MONMSG MSGID(CPF1310) EXEC(DO) /* No group jobs */ 

SNDUSRMSG MSG('An attention program is active, but no + 
group jobs exist') MSGTYPE(*INFO) 

ENDDO /* No group jobs */ 

ENDPGM 


If the user presses the Attention key, and then presses the F6 key to start a new 
group job (one that is not in his standard list), he must enter the SETATNPGM 


command in the new group job in order for the Attention key to be active. 


If the user wants to end all group jobs he can do so by calling the following 


program: 
PGM 
DCL &GRPJOBL *CHAR LEN(1056) 
DCL &X *DEC LEN(5 @) VALUE(67) /* 2nd group job */ 


RTVGRPA GRPJOBL (&GRPJOBL) 
MONMSG MSGID(CPF1311) EXEC(DO) /* Not a group job */ 
SNDPGMMSG MSG('The current job is not a group job') 


RETURN 
ENDDO /* Not a group job */ 

LOOP: IF (&X *NE 1057) DO /* Less than 16 group jobs */ 
IF (%SST(&GRPJOBL &X 10) *NE ' ') DO /* Job */ 
ENDGRPJOB GRPJOB(%SST(&GRPJOBL &X 10)) 

ENDDO /* Job */ 

CHGVAR &X (&X + 66) 

GOTO LOOP 

ENDDO /* Less than 16 group jobs */ 


CHGGRPA GRPJOB (*NONE) 
SNDPGMMSG MSG('ATT group jobs ended and the + 
current job is no tonger a group job') 


ENDPGM 


The program retrieves the current group job list, which can be made up of 16 entries 
where each entry is 66 bytes long containing: 


Group job name 10 characters 
Job number 6 characters 
Group job text 50 characters 


The active group job is the first one in the list. The program starts by trying to 
access the name of the second group job (starts in position 67) and if it is not blank, 
it ended the group job. When all other group jobs are ended, the current job is 
changed into a nongroup job. 
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Returning to the Group Job Main Program 
In all previous examples, the work station user was allowed to go to any function 
from any other function. An alternative is to have the work station user always 
return to the main program. This could be done using the previous example 
program and removing the SETATNPGM command, as follows: 


PGM 
OVRDBF . . . SHARE(*YES) 
OPNDBF... 

LOOP: CALL CUSINQ 
TFRGRPJOB GRPJOB(*PRY) 
GOTO LOOP 
ENDPGM 


The work station user cannot use the Attention key. Ending the function (exiting 
from the CUSINQ program) returns the work station user to the main program. 


As in the previous alternative, the only way to end this group job is to use the 
ENDGRPJOB command, use the ENDJOB command, or to sign off. 


Note: Using the OVRDBF and OPNDBF commands to specify a shared open, allows a 
faster open each time a group job is called. 


Transferring to Another Group Job without Seeing a Menu 
You can use the Attention key to transfer directly to another job without seeing a 
menu. For example, the Attention key handling program for group job A could 
transfer to group job B. The Attention key handling program for group job B could 
transfer back to group job A. This allows a single keystroke to be used to switch 
between functions. 


Ending Group Jobs 
In some environments it may be desirable to force the end user to correctly end 
certain group jobs rather than issuing the ENDGRPJOB command. For example, 
assume that the user may have a group job where there is a complex update involved 
and you want to be sure the job is ended normally. Another example is where the 
user may be in the middle of a SEU session and should complete the function 
normally. 


It is possible to achieve this with the support given by the system. For example, you 
could do the following: 


e Set a switch in the group data area that could be tested by each of the group 
jobs to function as the shutdown switch. That is, when the switch is set on, the 
group jobs function should be ended. 


e Access the active group job names by using the RTVGRPA command and the 
GRPJOBL return variable. Compare each name accessed (start with the second 
group job) against a predetermined list of the group job names that should be 
correctly ended. If the group job name is not in the list, it can be ended imme- 
diately by the ENDGRPJOB command. If the job must be correctly ended, 
transfer to the group job using the TFRGRPJOB command. 


e The Attention key handling program for all group jobs would have to be sensi- 
tive to the shutdown switch and would prevent transferring to another group job 
if the switch is set on. 
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¢ If you have a controlling program for each of the group jobs that controls what 
happens when the user ends the function of the group job (for example, the 
update program), it could also test the shutdown switch and do a return. This 
will end the group job and return control to the previous active group job. 


e The Attention key handling program can use the CHKRCDLCK command to 
determine if the work station user pressed attention when the application had a 
record locked for update. In this case, the attention program may send a 
message instructing the user to complete the operation before using the Atten- 
tion key. 


Performance Considerations 


Each group job (active or suspended) requires approximately 1K of dedicated main 
storage in the machine pool. Thus, the number of group jobs that are allowed to be 
active is a consideration. However, if main storage is not limited, this may be a 
good way to gain the benefits of separate process access groups (PAGs). This also 
allows you to avoid the overhead caused by repetitive opening of files and reestab- 
lishing environments, and to avoid excessive interactions to access common func- 
tions. For information on the machine pool, see Chapter 5, “Performance 
Guidelines.” 


The effect on the system for a large number of suspended jobs is normally small if 
the dedicated main storage requirement is not a factor. 


When a TFRGRPJOB command runs and a new job must be started, the overhead 
involved is roughly the same as signing on to the system. When the command is 
run and the group job is already started, the overhead required is roughly the same 
as using the transfer to a secondary job option on the System Request menu when 
the secondary job is already active. 


If a group job is to be run with any frequency, it is desirable to prevent it from 
ending. That is, do not end the program, but issue a TFRGRPJOB command to 
prevent job starting each time the group job function is needed. 


The SETATNPGM command causes the current display to be saved when the Atten- 
tion key is pressed, and to be restored when the Attention key handling program 
ends. This is roughly the same as using of the System Request menu and has a more 
noticeable effect on remote work stations. 


The controls on the number of jobs active in the system (the MAXJOBS parameter on 
the CRTSBSD command) are not affected by the number of group jobs active at any 
time. However, all system values that control the creation of job structures 
(QACTJOB and QADLACTJ, and QTOTJOB and QADLTOT)) are affected; these values 
may need to be increased to allow for the addition of group jobs. 
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Chapter 4. Examples of Changing Work Management Objects 


Once you understand how work management operates using shipped objects and are 
familiar with some of the CL commands, you should be able to start using work 
management functions to tailor the system to your operating needs. This chapter 
contains examples of some of the changes you may want to make to the work man- 
agement objects supplied by IBM such as: 


Change security level of system to require passwords. 

Provide for and control a completion message for each batch job. 
Use job queues to do long-running functions in a batch environment. 
Add more job queues. 

Create your own Interactive or batch subsystems. 


Note: If you are currently using QBASE as the controlling subsystem and are consid- 


ering tailoring your system operations by making changes to the subsystem 
description such as the ones described here, you should consider changing to 
use the QCTL controlling subsystem. It is easier to tailor with QCTL because 
the system activities are divided into separate subsystems that can be ended so 
you can make changes without doing an IPL. Most changes cannot be made 
to QBASE without an IPL. 


Controlling User Sign-Ons 


When a work station user signs on, the following actions occur: 


The routing table is searched for a match for the routing data, which comes 
from the job description. 


If QSYS/QCMD is the program specified in the routing entry that matched the 
routing data, the user profile is checked for an initial program. If an initial 
program is specified, that program is called. If control returns from the initial 
program, a check is made for an initial menu. If one is specified in the user 
profile, it is displayed. 


If QSYS/QCMD is not the program specified in the routing entry, the program that 
is specified is called. 


Therefore, there are ways in which you can control what is displayed when a work 
station user signs on: 


You can create an initial program or initial menu that is specified in a particular 
user profile and specify QSYS/QCMD in the routing entry. Whenever the user 
signs on with this user profile, the same information is displayed regardless of 
which work station he uses. 


You can specify an initial program or an initial menu on the Sign On display if 
your user profile allows this. 


You can change the work station entry to specify a job description that has 
routing data to route to a particular routing entry and call a specific program so 
the routing operates the same regardless of which user signs on at the work 
station. 


You can use request data in a job description to call a program. In this case, if 
the work station user has an initial program associated with his user profile, that 
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initial program is called. However, if there is no initial program associated with 
the user profile, the request data is processed and the specified program is called. 


Using an Initial Program in a User Profile 
To specify an initial program in a user profile, you use the Create User Profile 
(CRTUSRPRF) command: 


CRTUSRPRF USRPRF(WSUSERS) INLPGM(USRMNUPGM) INLMNU(*SIGNOFF) 


QSYS/QCMD should also be specified in the routing entry. The initial menu and 
initial program are called only when QSYS/QCMD is specified in the routing entry. If 
you route to a different program, the system will not call them. (You can call them 
with your own program. Use the RTVUSRPRF command to determine what they 
are.) Whenever someone signs on as WSUSERS, the user profile is checked for an 
initial program, and the program USRMNUPGM is called unless overridden on the 
Sign On display. This program can display a menu that allows work station users to 
select the application they want to run. 


If you do not end the initial program, the program continues to run until the sub- 
system is ended or the job is ended. 


For information about ending an initial program, see “Interactive Job 
Considerations” on page 2-30. 


Using an Initial Menu in a User Profile 
To specify an initial menu in a user profile, you use the Create User Profile 
(CRTUSRPRF) command: 


CRTUSRPRF USRPRF(WSUSERS) INLMNU(MAIN) INLPGM(SETUP) 


QSYS/QCMD should also be specified in the routing entry. The initial menu and 
initial program are called only when QSYS/QCMD 1s specified in the routing entry. If 
you route to a different program, the system will not call them. (You can call them 
with your own program. Use the RTVUSRPRF command to determine what they 
are.) Whenever someone signs on as WSUSERS, the user profile is checked for an 
initial program, and the program SETUP is called unless overridden on the Sign On 
display when the program setup is done. The initial menu MAIN 1s displayed (unless 
overridden on the Sign On display). The initial menu will continue to be displayed 
until you sign off. 


Using Routing Data 
When you use routing data to determine a controlling program for a work station, 
you need to create a job description that specifies the routing data, add a work 
station entry to the subsystem description, and add a routing entry to the subsystem 
description. (In order to change the subsystem description, the subsystem must be 
inactive.) 


CRTJOBD JOBD(DSPO2J0BD) USER(*RQD) RTGDTA('DSPO2') 

ADDWSE SBSD(QINTER) WRKSTN(DSPQ2) JOBD(DSPO2JOBD) 

ADDRTGE SBSD(QINTER) SEQNBR(100) CMPVAL('DSP02') PGM(DSPO2MNU) + 
POOLID(2) 


Whenever anyone signs on at work station DSP02, the system retrieves the routing 


data from the associated job description (DSP02JOBD) and compares it with the 
compare values specified in the routing entries. Because the routing data matches 
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the compare value in the routing entry that was added to the subsystem description 
for QINTER, the program DSP02MENU is called. 


Using Request Data 


When you use request data to determine a controlling program for a work station, 
you need to create a job description that specifies the request data, add a work 
station entry to the subsystem description specifying this job description, and create 
a user profile that specifies the password to be used. 


CRTJOBD JOBD(DSPO3J0B) USER(*RQD) RQSDTA('CALL DSPO3MENU') RTGDTA(QCMDT) 
ADDWSE SBSD(QINTER) WRKSTN(DSP03) JOBD(DSPO3J0BD) 
CRTUSRPRF USRPRF(DSPO3USER) INLPGM(*NONE) 


If someone signs on at work station DSP03 with user name DSPO3USER, the program 
DSPO3MENU is called. However, if someone signs on with user name WSUSERS, the 
program USERMENU (as described under “Using an Initial Program in a User 
Profile” on page 4-2) is called because it is specified in the user profile. If 
DSPO3USER is used to sign on at another work station that does not have a special 
work station entry set up, the initial menu is displayed. 


Using Double-Byte Request Data 


You can use double-byte data as part of the request data entered with the following 
commands: 


¢ Reroute Job (RRTJOB) 
e Transfer Job (TFRJOB) 
e Transfer Batch Job (TFRBCHJOB) 


The number of double-byte characters that you can include in request data, 
including shift control characters, is half the allowed number of alphameric charac- 
ters. 


Note: Do not use double-byte data as request data (RQSDTA) or routing data 
(RTGDTA) parameters on the Batch Job (BCHJOB) and Submit Job (SBMJOB) 
commands because the system might not properly process the data. 


Preventing Request End or Sign-Off 


Normally, a work station user can end a request or sign off by requesting the System 
Request menu and selecting the appropriate option. This could cause a problem if 
the work station user ended a request or signed off in the middle of a multiple oper- 
ation transaction. 


You can prevent access to the System Request menu (Security Concepts and Planning 
contains information on how to do this). You can also allow access to the System 
Request menu, but prevent the use of certain commands. For example, the security 
officer can revoke public authority to the End Request (ENDRQS) and SIGNOFF com- 
mands and give it only to those users that are not running sensitive applications. In 
order for the work station user to sign off, he must call a CL program that issues the 
SIGNOFF command. This program must be owned by someone with authority to the 
command and must be created with the value USRPRF(*OWNER) specified on the 
Create CL Program (CRTCLPGM) command. 


If the work station user’s authority to the ENDRQS and SIGNOFF commands is 


revoked and he attempts to select these options from the System Request menu, he 
receives a message that he does not have authority to the commands. 
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Changing the Start-Up (QSTRUP) Program 


The autostart job in the controlling subsystem transfers control to the program spec- 
ified in the system value QSTRUPPGM. You can can tailor this program. 


You can create your own program and change the QSTRUPPGM system value to that 
program name. Or, you can use the shipped program QSTRUP in QSYS as a base to 
create your own program. To do this, you would: 


1. Retrieve the source of the shipped program using the RTVCLSRC command. 
2. Change the program. 


3. Create the program using the CRTCLPGM command, putting it into your own 
library. 


4. Change the system value QSTRUPPGM to the program name and library you 
specified on the CRTCLPGM command. 


Creating a Programmer Output Queue 


You may want to create a special output queue for the programmer so his spooled 
output is always sent to that queue. This allows the programmer to use the Work 
with Spooled File (WRKSPLF) command or the source entry utility (SEU) to display 
the spooled output at his work station and then selectively print or delete the 
spooled output. 


First, you use the Create Output Queue (CRTOUTQ) command to create the output 
queue and the Grant Object Authority (GRTOBJAUT) command to give the pro- 
grammer authority to the output queue: 


CRTOUTQ OUTQ(PGMR) AUT(*NONE) AUTCHK(*DTARIGHTS) 
GRTOBJAUT OBJ(PGMR) OBJTYPE(*OUTQ) USER(QPGMR) AUT(*USE) 


You could change the OUTQ parameter in your user profile, or you could do one of 
the following: 


For interactive jobs, you can change the initial program for the programmer so 
the new initial program specifies this output queue: 


PGM 

CHGLIBL LIBL(TESTLIB QGPL QTEMP) 
CHGJOB OUTQ(PGMR) 

TFRCTL QSYS/QPGMMENU 

ENDPGM 


Other functions, such as the logging level for messages, could also be set in this 
initial program. The libraries specified on the Change Library List (CHGLIBL) 
command must exist on the system. Generally, the first library specified con- 
tains the basic programmer objects such as source files and a job description. 


Another alternative is to assign a unique job description to the user profile that 
contains the desired parameters. 


For batch jobs, you create a job description with the Create Job Description 
(CRTJOBD) command and specify the QGPL/PGMR output queue on the OUTQ 
parameter. 
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Adding a Second Job Queue 


Allowing More 


This example assumes that the system has already been changed to use the QBATCH 
subsystem for batch work. 


The QBATCH subsystem is shipped with a single job queue for submitting batch jobs: 
QBATCH. A second job queue can be created and added to the subsystem. 


To create the job queue, enter the following command: 


CRTJOBQ JOBQ(QGPL/QBATCH2) + 
TEXT('Second job queue for QBATCH') 


To add the job queue to the QBATCH subsystem when the subsystem is inactive, enter 
the following command: 


ADDJOBQE SBSD(QGPL/QBATCH) + 
JOBQ(QGPL/QBATCH2) + 
SEQNBR(2Q) 


See “Subsystem Descriptions” on page 2-3 for information on how jobs are selected 
from multiple job queues in a single subsystem. 


Batch Jobs to Run in QBATCH at a Time 


The QBASE subsystem is shipped with a job queue entry for the QBATCH job queue 
that only allows one batch job at a time to be running. If you want to allow more 
batch jobs from that job queue to be running at the same time you would use the 
Change Job Queue Entry (CHGJOBQE) command. The following command would 
allow two batch jobs from the QBATCH job queue to be running at the same time in 
the QBASE subsystem. (This command can be issued at any time and will take effect 
immediately.) 


CHGJOBQE SBSD(QBASE) JOBQ(QBATCH) MAXACT(2) 


Sending a Completion Message for Each Batch Job 


You can use the MSGQ parameter on the BCHJOB or Submit Job (SBMJOB) command 
to specify the name of the message queue to which a completion message is to be 
sent when the job has completed (message CPF1241 indicates a normal completion 
and CPFi240 indicates an abnormal completion). For example, to send a completion 
message to the QSYSOPR message queue, you could use the following BCHJOB 
command: 


//BCHJOB JOB(PAYROLL) JOBD(PAYROLL) MSGQ(QSYSOPR) 


Instead of sending the completion messages for all jobs to the QSYSOPR message 
queue, you may want to send the completion messages for some jobs to the message 
queue of the submitting work station and for other jobs to a message queue that is 
periodically displayed or printed. 


Another alternative is to send all the completion messages to a user message queue. 
You can then use a program to receive the messages from this queue and to resend 
them if necessary. For example, if a job failed for a user who is not a programmer 
or the system operator, the program could resend the message to both the work 
station user and the system operator. 
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Setting Up an Unattended Environment 


To set up an unattended environment and prevent unauthorized users from using the 
console while the system is unattended, have the system operator change the 
QSYSOPR message queue to default delivery and sign off. The sign-off prevents unau- 
thorized users from using the console. The following command changes the QSYSOPR 
message queue: 


CHGMSGQ MSGQ(QSYSOPR) DLVRY(*DFT) 


Setting Up an Unattended Nighttime Environment 


You may have jobs in your installation that can be run in an unattended nighttime 
environment. These jobs could be submitted throughout the day to be processed at 
night. To set up this environment, you could create a special subsystem for the 
nighttime work. The subsystem description and job queue could be defined with the 
following commands: 


CRTSBSD SBSD(NIGHTQ) POOLS((1 *BASE)) TEXT(' + 
Nighttime jobs') 
CRTJOBQ JOBQ(NIGHTQ) TEXT('Nighttime job queue') 
ADDJOBQE SBSD(NIGHTQ) JOBQ(NIGHTQ) MAXACT(1) 
ADDRTGE SBSD(NIGHTQ) SEQNBR(10) + 
CMPVAL(*ANY) PGM(QSYS/QCMD) CLS(QGPL/QBATCH) 


You then create a job description using the Create Job Description (CRTJOBD) 
command that specifies the job queue QGPL/NIGHTQ on the JOBQ parameter. 
When ready to start the NIGHTQ subsystem, the system operator: 


1. Ends all active subsystems except the controlling subsystem using the End Sub- 
system (ENDSBS) command. 


2. Starts the NIGHTQ subsystem with the Start Subsystem (STRSBS) command. 


3. Changes the QSYS/QSYSOPR message queue to place it in default mode so any 
messages requiring a response receive a default reply. 


4. Submits a job with request data of a Power Down System (PWRDWNSYS) 
command and a job priority of 9 to the NIGHTQ job queue. This priority places 
the job at the end of the job queue so the system will be powered down when all 
the jobs in the job queue have been processed. 


5. Signs off. 
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The STRSBS command, the Change Message Queue (CHGMSGQ) command, and the 
PWRDWNSYS command could be placed in a CL program to simplify the operator’s 
job. The CL program could be: 


PGM 

CHGMSGQ QSYSOPR DLVRY(*DFT) 

STRSBS NIGHTQ 

SBMJOB JOBD(QBATCH) JOBQ(NIGHTQ) JOBPTY(9) + 
CMD(PWRDWNSYS *IMMED) 

SNDPGMMSG MSG('NIGHTQ subsystem started and power down + 
job submitted') 

ENDPGM 


This solution assumes that only one job is run at a time from the NIGHTQ job queue 

and that no other jobs are running while the nighttime subsystem is running. If this 

is not desirable, the procedure should be changed as in the following example so that 
two jobs run at once and when they are completed, the system powers down. 


The following CL program could be used to start the NIGHTQ subsystem with two 
batch jobs running and to ensure that all jobs have finished before the system is 
powered down. The job queue entry shown in the previous example should be 
changed to meet your requirements. 


PGM 

CHGMSGQ QSYSOPR DLVRY(*DFT) 

CHGSBSD NIGHTQ MAXJOBS(2) /* Reset to 2 */ 

STRSBS NIGHTQ 

SBMJOB JOBD(QBATCH) JOBQ(NIGHTQ) JOBPTY(9) CMD(CHGSBSD NIGHTQ + 
MAXJOBS(1)) JOB(CHGMAXJOBS) 

SBMJOB JOBD(QBATCH) JOBQ(NIGHTQ) JOBPTY(9) + 
CMD(PWRDWNSYS *IMMED) JOB(POWERDOWN) 

SNDPGMMSG MSG('NIGHTQ subsystem started and power down job + 
submitted ' ) 

ENDPGM 


When the subsystem is started, the MAXJOBS value is set to 2. The first job sub- 
mitted (CHGMAXJOBS) then sets the MAXJOBS value to 1 just before the power down 
job is run. Because the priority of both the CHGMAXJOBS and POWERDOWN jobs is 
9, neither job runs until all higher priority jobs in the queue (0 being the highest 
priority) are run. 
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Calling a Special Recovery Program 


To call a special recovery program if the IPL senses that the previous system ending 
was abnormal, you can add an autostart job entry to the subsystem description for 
the controlling subsystem. This program checks the system value QABNORMSW. For 
a normal system ending, the value of QABNORMSW is ’0’, and for an abnormal 
system ending the value of QABNORMSW is ‘1’. 


SEQNBR *... ... eee 2) bc. Woe D oantews Be fase: sate sae ears 0) ia hax 7 
1.00 /* SPCRECOV - Autostart program to call special recovery program */ 
2.00 PGM 
3.00 DCL &QABNORMSW *CHAR LEN(1) 

4.00 RTVSYSVAL SYSVAL(QABNORMSW) RTNVAR(&QABNORMSW) 

5.00 IF (&QABNORMSW *EQ '1') DO /* Recover */ 

6.00 SNDPGMMSG MSG('Recovery program in operation-do not + 
7.00 start subsystems until notified') + 

8.00 TOMSGQ (QSYSOPR) 

9.00 CALL RECOVERY 

10.00 SNDPGMMSG MSG('Recovery complete-jobs may be started’) + 
11.00 TOMSGQ (QSYSOPR) 

12.00 ENDDO /* Recover */ 

13.00 ENDPGM 


An alternative would be to drop the messages and start up other subsystems when 
your recovery function is complete. 


Preventing Sign On Display from QINTER 


This example assumes that the system has been changed to use the QINTER sub- 
system for interactive work. 


If you do not want the Sign On display shown at all work stations when you start 
the QINTER subsystem, you can do the following: 


Change the work station entries in the QGPL/QINTER subsystem description to specify 
the work stations by name (WRKSTN), rather than by type (WRKSTNTYPE). For the 
work stations for which you want the Sign On display to appear, specify 
AT(*SIGNON) 1n the work station entry. For the work stations for which you do not 
want the Sign On display to appear, specify AT(*ENTER). This allows interactive jobs 
to be transferred to work stations with AT(*ENTER) specified in the QGPL/QINTER 
subsystem. 


Performing a Long-Running Function from a Work Station 


To perform a long-running function (such as save/restore) from a work station 
without tying it up, the system operator can submit the job to a job queue. The 
controlling subsystem description QGPL/QCTL or QGPL/QBASE, which is supplied by 
IBM, has a job queue QSYS/QCTL that can be used for this purpose. If you created 
your own controlling subsystem, you should refer to the job queue for that sub- 
system. The system operator can submit the commands from the system operator 
menu. The following is an example of submitting a long-running command: 


SBMJOB JOB(SAVELIBX) JOBD(QBATCH) JOBQ(QSYS/QCTL) + 
CMD(SAVLIB LIBX CLEAR(*YES)) 
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Controlling a Group of Work Stations 


You may want to control a group of work stations separately. For example, if you 
have a group of work station users who are using the same application, you may 
want that group of users to sign off to perform some special application function or 
to send them a message. You can: 


e Create a separate subsystem for the group of work station users. A separate 
subsystem will allow a convenient start and shutdown, but it will not simplify 
the job of sending messages to the group. 


¢ Create a command or a CL program that can be used to send a message to a 
group of work stations. However, this approach does not assist in controlling 
sign-on or sign-off. See the CL Programmer’s Guide, for an example of a CL 
program that can be used to send a message to a group of work stations. 


Changing Priority and Time Slice 


You can create a program that changes your priority and time slice for the duration 
of the command running and then resets the two values to what they were previ- 
ously. For example, it may be desirable to have a special program that can be used 
in an emergency situation where the response time of command running is critical. 
To do this, you would enter the following program to improve the performance of 
the WRKACTJOB command: 


PGM 

DCL &RUNPTY *DEC LEN(2 0) 

DCL &TIMESLICE *DEC LEN(7 Q) 

RTVJOBA RUNPTY(&RUNPTY) TIMESLICE(&TIMESLICE) 
CHGJOB RUNPTY(1) TIMESLICE(20000) 

WRKACTJOB 

CHGJOB RUNPTY(&RUNPTY) TIMESLICE(&TIMESLICE) 
ENDPGM 


You may want to create a command for this function to allow a simple means of 
running this program. 


If the WRKACTJOB command is being used to determine an immediate performance 
situation on the system, you should consider specifying the command as: 


WRKACTJOB CPUPCTLMT(2) RESET(*YES) 


When the display first appears, there will be no active jobs meeting the requirements 
because the active job statistics have been reset. If the Refresh key is pressed, the 
display will then show all jobs that are using more than 2% of the processing unit 
resource since the command was run. 


Mixing Double-Byte and Alphameric Display Stations 


If you use both double-byte and alphameric devices with your system, you can create 
an initial program to have double-byte versions of user-written alphameric messages 
and user-designed displays shown at double-byte work stations. The following pro- 
cedure describes how to show the double-byte versions of messages and displays at 
double-byte work stations: 
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1. Create a library for storing the double-byte versions of messages and display 
files. For example, to create a library named DBCSLIB, enter the following 
command: 


CRTLIB LIB(DBCSLIB) TEXT('Double-byte version of objects') 
2. Put a copy of the messages and display files into the library you just created. 


3. Translate the information in the copied file from alphameric information to 
double-byte information. For example, change message text from alphameric to 
double-byte. 


Do not change the file name. 


4. Create a job description to be used for the double-byte devices. This job 
description should be similar to that used for alphameric work stations. 
However, the job description has different routing data. For example, to create 
the job description DBCSJOBD, enter the following command: 


CRTJOBD JOBD(DBCSJOBD) RTGDTA(DBCSWS) LOG(4 © *SECLVL) + 
TEXT('Double-byte work station job description’) 


5. Create a copy of the subsystem description. This description will be changed for 
use as a subsystem description for DBCS work stations. For example, to create a 
copy of the subsystem description named QINTER as the subsystem description 
DBCSSBSD, enter the following command: 


CRTDUPOBJ OBJ(QINTER) FROMLIB(QGPL) OBJTYPE(*SBSD) + 
NEWOBJ (DBCSSBSD) 


6. Change the work station entry for the 5555 Display to specify the job 
description you just created. For example, to specify a job description named 
DBCSJOBD, enter the following command: 


CHGWSE SBSD(DBCSSBSD) WRKSTNTYPE(5555) JOBD(DBCSJOBD) 


7. Add a routing entry that matches the routing data of the double-byte job 
description. For example: 


ADDRTGE SBSD(DBCSSBSD) SEQNBR(15) CMPVAL(DBCSWS) + 
PGM(DBCSPGM) 


8. Create a CL program named DBCSPGM, similar to the one shown below, that per- 
forms the following functions: 


a. Inserts the double-byte library at the start of the system library list before 
transferring to the system module QCMD. 


b. Overrides the default printer file so that the file is double-byte. When the 
default printer file is double-byte, the system properly prints double-byte 
output printed as a result of pressing the Print key. 


PGM 
CHGSYSLIBL LIB(DBCSLIB) 
OVRPRTF FILE(QSYS/QSYSPRT) IGCDTA(*YES) 
TFRCTL QSYS/QCMD 

ENDPGM 


When you use the subsystem description DBCSSBSD, the double-byte versions of user- 
written messages and user-designed displays that are stored in the library DBCSLIB 
are shown at double-byte work stations. The alphameric versions of these messages 
and displays continue to be shown at alphameric work stations. 
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C Time-Dependent Scheduling 


Some applications require that functions be performed at a specified time. This is 
referred to as time-dependent scheduling. 


Although the system does not support this type of function directly, existing func- 
tions can be combined to perform time-dependent scheduling. 


A single request-processing job must be active at all times to handle all of the time- 
dependent requests sent by other jobs. These requester jobs can send one or more 
requests, which are then run or released by the single request-processing job when 
they are due. 


The following sample commands illustrate two different uses for time-dependent 
scheduling. 


e Send Time-Dependent Message (SNDTIMMSG): Runs a SNDMSG command at the 


( requested time. 


e Submit Time-Dependent Job (SBMTIMJOB): Runs a SBMJOB command with 
HOLD(*YES) and is released at the requested time. 


SNDTIMMSG Sample Command 
The SNDTIMMSG (Send Time-Dependent Message) sample command would be used 
for simple functions where you want to send a message to yourself or a work station 
user at a specific time as a reminder, for example, to attend a.meeting or make a 
'S telephone call. It is intended for personal rather than program action. 


This sample command would have the following parameters: 
MSG The message text. Up to 100 characters can be sent. 


HOUR The hour the message should be sent. The 24-hour clock is used (2 p.m. 
is entered as 14). A special value of *NOW is allowed so that the message 
can be sent immediately. This allows users to have a single command to 
do both the delayed time and immediate function. If *NOW is specified 
and a different date is entered, the current time is used for the specified 


( date. 


MIN The minute the message should be sent. The default is 00. 


DATE The date on which the message should be sent. The default is *TODAY, 
which sends the message the same day. Other special values of *DAY1, 
*DAY2 through *DAY14 allow for sending the message any time from 1 
through 14 days from today. An actual date may also be entered in the 
system format (for example, MMDDYY). 


TOMSGQ__ The qualified name of the message queue that is to receive the message. 
The default is *USER, which means to send it back to the requesting 
user’s message queue. 
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The user name of the requesting user is concatenated to the beginning of the 
message. If user JONES enters: 


MSG Will you meet me for lunch? 


it appears as the following message: 


From Jones --- Will you meet me for lunch? 


If you are sending messages that contain apostrophes, a special form may be 
required. If the SNDTIMMSG command is entered by using the prompter, the 
message should be entered with single apostrophes, such as the following: 


MSG Don't forget your meeting tomorrow 


If the command is entered in a CL program, or if the prompter is not used to enter 

the SNDTIMMSG sample command, the message should be written with surrounding 

apostrophes for the MSG parameter and two apostrophes for each one desired in the 
text of the message, such as the following: 


MSG('Don"t forget your meeting tomorrow') 


If the message text is in a CL variable, there should be only one apostrophe in the 
message for each apostrophe desired. 


The SNDTIMMSG sample command rejects any attempt to send a message for a date 
and time that precedes the current system date and time. This minimizes errors 
occurring when the date or time is incorrectly specified. 


SBMTIMJOB Sample Command 


The SBMTIMJOB (Submit Time-Dependent Job) sample command allows any job to 
be submitted to a job queue with HOLD(*YES). A RLSJOB command is then added to 
the TIMFILP data base file. The RLSJOB command is run when it is due. The job in 
the held status acts as a normal job on the job queue and does not require an 
activity level until it is released and is running. 


Note: The job is not run at the requested time; rather it is released at that time. All 
held jobs appear last on the job queue. A job is released according to the 
sequence of its job number in relation to the sequence number of all other 
jobs of the same priority level. If it is critical to perform certain functions at 
the requested time, then a unique job queue could be created to handle these 
requests. 
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This SBMTIMJOB sample command supports the following parameters: 


RQSDTA 


HOUR 


MIN 


DATE 


JOB 


JOBD 


WRKSBMJOB 


The request data to be submitted. Up to 256 bytes may be 
entered. 


The hour the job should be released. The 24-hour clock is used (2 
p.m. is entered as 14). A special value of *NOW is allowed so 
that the message can be sent immediately. This approach allows 
users to have a single command to do both the delayed time and 
immediate function. If *NOW is specified and a different date is 
entered, the current time is used for the specified date. 


The minute the job should be released. The default is 00. 


The date on which the job should be released. The default is 
*TODAY, which releases the job the same day. Other special 
values (*DAY1, *DAY2 through *DAY14) allow for releasing the job 
any time from 1 through 14 days from today. An actual date 
may also be entered in the system format (for example, 
MMDDYY). 


The job name to be assigned to the submitted job. The default is 
the job description name. 


A fully qualified job description name to be used for the sub- 
mitted job. The default is QUSER, which uses the job description 
specified in the requesting user’s profile. 


A *YES/*NO value that has the same definition as the parameter 
on the SBMJOB command. The default is *NO, which may be used 
to prevent the submitted job from being displayed by the 
WRKSBMJOB command. 


If the prompter is used to enter the SBMTIMJOB sample command, the RQSDTA 
parameter may be entered as ?xxxXxXxX on the prompt display. The other parameters 
for the SBMTIMJOB command should be filled in before pressing the Enter key. The 
next display is the prompt for the xxxxx command. For example, assume that the 
CPYF command should be submitted at a specific time. The user would request the 
prompter for the SBMTIMJOB command and fill in the appropriate parameters. The 
RQSDTA parameter should be entered as ?cPYF. The next display is the prompt for 
the CPYF command. This simplifies entering the command to be run. 
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It is not necessary to use prompting for the SBMTIMJOB command in order to use the 
? function to prompt for the RQSDTA parameter. If the command is entered as 
follows, the prompter would be called for the CPYF command. 


SBMTIMJOB RQSDTA(?CPYF) HOUR(16) 


Note: The special value of *NOW in the HOUR parameter allows the command to act 
like the SBMJOB command with prompting for the request data. That is, the 
user can submit a command to run immediately and still receive prompting 
for the submitted command, such as: 


SBMTIMJOB RQSDTA(?CPYF) HOUR(*NOW) 


If you are submitting commands that require apostrophes, a special form may be 
required. If the SBMTIMJOB command is entered with prompting, then the command 
to be submitted must be entered with single apostrophes, such as: 


CALL PGMA PARM('ABC' 'XYZ') 


If the command is entered in a CL program, the RQSDTA parameter should be written 
with surrounding apostrophes and two apostrophes for each one desired in the run 
command, such as: 


RQSDTA('CALL PGMA PARM(''ABC'' ''XYZ'')') 


At the completion of the submitted job, the job completion message is sent to the 
originating work station. 


The SBMTIMJOB sample command rejects any attempt to submit a job for a date and 
time that precedes the current system date and time. This minimizes errors occurring 
when the date or time is incorrectly specified. 


The WRKSBMJOB(*NO) option allows a standard function such as an initial program 


to submit a job for later running. The job will not appear on the WRKSBMJOB 
display with directly submitted jobs. 


4-14 Work Management Guide 


Starting the Request-Processing Job 
The request-processing job would normally be started at the beginning of the day, 
possibly as an autostart job associated with a particular subsystem. In this example, 
the program to be called is TIMPGMC, a CL program that will call the RPG program 
TIMPGM when needed. 


The request-processing job runs as an interactive job for most of its functions; you 
may choose to place it in the interactive subsystem. The program remains active 
until you end it (see the sample command ENDTIMSCH later in this chapter). It is 
active in main storage only when new requests arrive or a time-out occurs. If the job 
is placed in a batch subsystem, you will want to be sure that the maximum number 
of jobs specified will allow the request-processing job as well as your other jobs to be 
started. To submit the job to the QINTER job queue, the following command could 
be used: 


SBMJOB JOB(TIMESCHED) JOBD(XXXX) RQSDTA('CALL TIMPGMC') + 
JOBQ(QINTER) INQMSGRPY(*SYSRPYL) 


See “Security Considerations” on page 4-16 later in this chapter about the required 
*JOBCTL special value. 


The INQMSGRPY parameter is specified to use the system reply list. which ensures 
problem analysis help if an inquiry message occurs (assuming that the response to 
any inquiry message will provide a program dump). 


When the program Is started, it clears out any requests that have been run from the 
last time the program was started. When a request is run, the record in TIMFILP 1s 
updated, reflecting, for problem analysis purposes, what was entered, who entered it. 
and when it was run. When the program is started, the previous requests that ran 
are deleted by copying the file into a file in QTEMP and then copying it back again 
and omitting the completed requests. 


For an audit trail, you could either journal the file, change the TIMPGM program to 
print the requests that ran before deleting them, or cause the records to be printed 
with the CPYF command before deleting them. 


When the request-processing program starts, there may be overdue requests in the 
file that have been entered and already come due before the request-processing 
program 1s started. If this occurs, these requests are run immediately. 


The request-processing job may be ended by using the End Job (ENDJOB) command 
or by the sample command End Time Scheduling (ENDTIMSCH). There are no 
parameters for this command and it is entered as: 


ENDT IMSCH 
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Security Considerations 
You may authorize the commands and the programs as required. 


The command entered on the SBMTIMJOB sample command is submitted for pro- 
cessing with the user profile of the requester, because the SBMJOB command defaults 
to USER(*CURRENT). It is the request-processing job that releases the requester job. 
To release another user’s job, the request-processing job must be started by a user 
who has special authority *JOBCTL. 


The running of the SNDTIMMSG command causes the running of the SNDMSG 
command to occur in the request-processing job, under the user profile who started 
the request-processing job. If the messages are sent only to work station message 
queues, there should be minimal security considerations. As in a normal environ- 
ment, you may wish to control who can send messages to certain user-created 
message queues. 


Recovery Considerations 
If an error occurs on a command so that it must be run again, the command would 
need to be reentered. 


If an abnormal system ending occurs, the normal procedure for a full recovery would 
be to start the request-processing job again. However, in time-dependent scheduling 
there is an interval between the time that a job is placed on the job queue and the 
time that a record is added to the TIMFILP file or between the time that a record in 
the TIMFILP is coded as sent and the time that the command is run. This interval is 
small enough so that in most cases an unsynchronized condition does not occur. 
However, following an abnormal ending, you may want to check manually to ensure 
that the TIMFILP and the jobs on the job queue are synchronized. 
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Creating the Objects 


The sample objects should be placed in a library such as QGPL where all users can 
access them by use of their library list. If QGPL is not used, you will need to change 
where you specifically refer to QGPL in the sample code. 


In the following example, the data base file TIMFILP is used to hold the requests to 
be processed. The SNDTIMMSG and SBMTIMJOB functions add records to this file. A 
request-processing job remains continuously active waiting to process requests. 


Adding a record to a data base file will not cause the request-processing program to 

activate. Therefore, a data queue is used to allow the request-processing program to 
monitor for new requests and to wait for the timeout to run the due requests. Data 

queues are discussed in the CL Programmer’s Guide and are called by the QSNDDTAQ 
and QRCVDTAQ OS/400-supplied programs. 


TIMDTAQ Data Queue 


The TIMDTAQ data queue is created automatically in QGPL as part of the TIMPGMC 
program. The data queue will be deleted and re-created each time the TIMPGMC 
program is run. 


CRTMSGQ XXXX/TIMMSGQ TEXT('Time-dependent scheduling queue') 


TIMFILP Physical File 


The following is the DDS for the TIMFILP; it should be created with the CRTPF 


command. 

SEQNBR 3%. Ses O° locate, "Sea Seatas Spee: Bie Dy coiuaven Geiace 6 ae eed 7 
1.00 A R TIMFILR TEXT('Time Rcd Format') 
2.00 A DLTCOD 1 COLHDG('Delete' 'Code') 
3.00 A TEXT('Delete Code - + 
4.00 A Blank = Ready, + 
5.00 A X = Complete’) 

6.00 A RQSDAT 6 COLHDG('Request' 'Date') 
7.00 A RQSTIM 6 COLHDG('Request' 'Time') 
8.00 A NBRSEC 5 COLHDG('Number of' + 
9.00 A 'Seconds' 'For Request') 
10.00 A ENTDAT 6 COLHDG(‘'Entry' '‘Date') 
11.00 A ENTTIM 6 COLHDG('Entry' 'Time') 
12.00 A JOB 10 COLHDG('Job name') 
13.00 A USER 10 COLHDG('User name') 
14.00 A JOBNBR 6 COLHDG('Job nbr') 
15.00 A SNTDAT 6 COLHDG('Sent' '‘Date') 
16.00 A SNTTIM 6 COLHDG('Sent' 'Time') 
17.00 A CMD 256 COLHDG('Command') 
18.00 A SBM100 100 TEXT('1lst 100 bytes + 
19.00 A of rqs dta submitted or + 
20.00 A SNDTIMMSG' ) 
21.00 A K DLTCOD 
22.00 A K RQSDAT 
23.00 A K NBRSEC 
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The field information for ENTDAT, ENTTIM, JOB, USER, JOBNBR, SNTDAT, SNTTIM, 
and SBM100 is only for problem analysis and audit trail purposes. The SBM100 field 
contains the first 100 bytes of the RQSDTA parameter of the SBMTIMJOB command. 
The RQSTIM field is for readability purposes only. The data is converted from the 
RQSTIM field to the NBRSEC field (the time in number of seconds) for ease of pro- 
cessing. 


The file is kept in a key sequence of DLTCOD, DATE, NBRSEC. The DLTCOD is blank 
for a normal record and X if the request has been run. The access path definition 
ensures that the first record in the file 1s the first request to be run. After it is run, it 
is updated with an X and becomes the last record in the access path. As mentioned, 
the starting of the request-processing program removes the records with a delete 
code of X. 


SNDTIMMSG Command and Processing Program 
The following is the source for the SNDTIMMSG command (you may wish to change 
this command to allow such functions as a specific time or a number-of-seconds 


delay): 

SEQNBR *... ... ete, eae Cea Gore Sie sare ee ee Oeste ees Or ie res 7 
1.00 /*PARMS PGM(SNDTIMMSGC) */ 
2.00 /* ad | 
3.00 /* Send time message sends a message at a specified time which */ 
4.00 /* can be now, sometime today or at a specified date. =) 
5.00 /* */ 
6.00 /* The CPP is SNDITMSMGC. Associated commands - SBMTIMJOB/ENDTIMSCH*/ 
7.00 /* cd | 
8.00 /* The TIMPGMC and TIMADD programs must be active. py | 
9.00 /* */ 

10.00 CMD PROMPT('Send Time Message') 

11.00 PARM MSG TYPE(*CHAR) LEN(100) MIN(1) EXPR(*YES) + 
12.00 PROMPT ('Message text:') 

13.00 PARM HOUR TYPE(*CHAR) LEN(2) MIN(1) + 

14.00 RANGE(Q@ 23) SPCVAL(('*NOW' '**')) + 

15.00 PROMPT('Hour as 24 hr clock or *NOW:') 

16.00 PARM MIN TYPE(*CHAR) LEN(2) DFT(@0) + 

17.00 RANGE(0@ 59) + 

18.00 PROMPT('Minute (00-59):') 

19.00 PARM KWD(DATE) TYPE(*DEC) LEN(6 ©) DFT(*TODAY) + 
20.00 RANGE (000000 999999) SPCVAL((*TODAY 0) + 
21.00 (*DAY1 -1) (*DAY2 -2) (*DAY3 -3) (*DAY4 -4) + 
22.00 (*DAY5 -5) (*DAY6 -6) (*DAY7 -7) (*DAY8 -8) + 
23.00 (*DAY9 -9) (*DAY10 -10) (*DAY11 -11) + 

24.00 (*DAY12 -12) (*DAY13 -13) (*DAY14 -14)) + 
25.00 PROMPT('Date (sys fmt) *TODAY *DAYnn:') 

26.00 PARM KWD(TOMSGQ) TYPE(QUAL1) DFT(*WRKSTN) + 

27.00 SNGVAL((*WRKSTN)) PROMPT('Message queue + 
28.00 (*WRKSTN):') 

29.00 QUALI: QUAL TYPE(*NAME) LEN(10) EXPR(*YES) 

30.00 QUAL TYPE(*NAME) LEN(10) DFT(*LIBL) + 

31.00 SPCVAL((*LIBL)) EXPR(*YES) PROMPT('Library:') 
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The following is the source for the SNDTIMMSGC CL program: 


SEQNBR *... ... dL whe, eas C Gass eee So oc aa Des gota cane OF sad: “aes Gaon rake 7 
1.00 /* SNDTIMMSGC - Send time message - CPP for SNDTIMMSG * 
2.00 PGM PARM(&MSG &HR &MIN &DATEI &MSGQF) 

3.00 DCL &MSG *CHAR LEN(100) 

4.00 DCL &HR *CHAR LEN(2) 

5.00 DCL &MIN *CHAR LEN(2) 

6.00 DCL &DATEI *DEC LEN(6 Q) /* Input date */ 

7.00 DCL &TIME *CHAR LEN(6) 

8.00 DCL &MSGO *CHAR LEN(110) 

9.00 DCL &DATEO *CHAR LEN(6) /* Output date */ 

10.00 DCL &DATEJA *CHAR LEN(5) /* Julian alpha date */ 
11.00 DCL &DATEJN *DEC LEN( 5 0) /* Julian dec date */ 
12.00 DCL &CURDAT *CHAR LEN(6) /* Current date */ 

13.00 DCL &CURDATJA *CHAR LEN(6) /* Julian cur date */ 
14.00 DCL &DAYS *DEC LEN(3 0) 

15.00 DCL &DAYSA *CHAR LEN(3) 

16.00 DCL &YEAR *DEC LEN(2 @) 

17.00 DCL &YEARA *CHAR LEN(2) 

18.00 DCL &LEAP *CHAR LEN(18) VALUE('000408121684889296' ) 
19.00 DCL &FLDLEN *DEC LEN(5 0) VALUE(2) 

20.00 DCL &X *DEC LEN(3 0) VALUE(-1) /* Index to leap */ 
21.00 DCL &ENDYR *DEC LEN(3 0) VALUE(365) 

22.00 DCL &DATEA *CHAR LEN(6) /* Date in alpha */ 
23.00 DCL &CURHR *CHAR LEN(2) 

24.00 DCL &CURMIN *CHAR LEN(2) 

25.00 DCL &MSGQF *CHAR LEN(20) /* Full message queue */ 
26.00 DCL &CMD *CHAR LEN(256) 

27.00 DCL &JOB *CHAR LEN(10) 

28.00 DCL &USER *CHAR LEN(10) 

29.00 DCL &JOBNBR *CHAR LEN(6) 

30.00 DCL &NOW *LGL 

31.00 DCL &FROM *DEC LEN(3 0) VALUE(1) /* From index */ 
32.00 DCL &TO *DEC LEN(3 0) VALUE(1) /* To index */ 
33.00 DCL &SBM100 *CHAR LEN(100) /* 1st 100 of msg */ 
34.00 RTVJOBA JOB(&J0B) USER(&USER) NBR(&JOBNBR) 

35.00 IF (%SST(&MSGQF 1 10) *EQ '*WRKSTN') + 

36.00 CHGVAR &MSGQF (&JOB *CAT 'QSYS') 

37.00 CHKOBJ OBJ(%SST(&MSGQF 1 10).%SST(&MSGQF 11 10)) + 
38.00 OBJTYPE(*MSGQ) /* Does MSGQ exist */ 

39.00 MONMSG MSGID(CPFQ000) EXEC(SNDPGMMSG MSGID(CPF9898) + 
40.00 MSGF(QCPFMSG) MSGTYPE(*ESCAPE) MSGDTA('+ 
41.00 Unable to access message queue ' *CAT + 
42.00 %SST(&MSGQF 1 10) *TCAT '.' *TCAT + 
43.00 %SST(&MSGQF 11 10))) 
44.00 RTVSYSVAL QHOUR RTNVAR(&CURHR) 
45.00 RTVSYSVAL QMINUTE RTNVAR(&CURMIN) 
46.00 RTVSYSVAL QDATE RTNVAR(&CURDAT) /* Today's date */ 
47.00 IF (SHR *EQ '**') DO /* *NOW converted to ** */ 
48.00 CHGVAR &HR &CURHR /* Set to current */ 
49.00 CHGVAR &MIN &CURMIN /* Set to current */ 

50.00 IF (&DATEI *EQ 0) CHGVAR &NOW '1' /* Set to on */ 
51.00 ENDDO /* *NOW converted to ** */ 

52.00 CHGVAR &DATEA &CURDAT /* Start with today's date */ 
53.00 IF (&DATEI *GT @) CHGVAR &DATEA &DATEI /* Value */ 
54.00 IF (SDATEI *LT 0) DO /* *DAYnn function */ 
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55.00 
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LEAPLOOP: 


NEXT: 


CVTDAT 
CHGVAR 
CHGVAR 
CHGVAR 


CHGVAR 
CHGVAR 
CHGVAR 
CHGVAR 
CHGVAR 


CVTDAT 


ENDDO 

CVTIDAT 
MONMSG 
CVTDAT 


CHGVAR 
CHGVAR 


CHGVAR 
CALL 


CALL 


&DATEA TOVAR(&DATEJA) TOFMT(*JUL) TOSEP(*NONE) 
&DATEJN &DATEJA /* Change to numeric */ 
&DATEJN (&DATEJN - &DATEI) /* Sub neg nbr */ 
&DATEJA &DATEJN /* Change to alpha */ 

/* Check for date which is in the next year */ 

&YEARA %SST(&DATEJA 1 2) /* Extract year */ 

&DAYSA %SST(&DATEJA 3 3) /* Extract days */ 

&YEAR &YEARA /* Change to numeric */ 

&DAYS &DAYSA /* Change to numeric */ 

&X (&X + 2) /* Index to leap year years */ 

(&X *LT 19) DO /* & is less than 19 */ 

(%SST(&LEAP &X 2) *EQ &YEARA) CHGVAR &ENDYR 366 

LEAPLOOP 

/* & is less than 19 */ 

(&ENDYR *LT &DAYS) DO /* Bump for next year */ 

&DAYS (&DAYS - &ENDYR) /* Subtract end year */ 

&YEAR (&YEAR + 1) /* Increment year */ 

&YEARA &YEAR /* Change to alpha */ 

&DAYSA &DAYS /* Change to alpha */ 

%SST(&DATEJA 1 2) &YEARA /* Move new days */ 

%SST(&DATEJA 3 3) &DAYSA /* Move new year */ 

/* Bump for next year */ 

&DATEJA FROMFMT(*JUL) TOVAR(&DATEA) + 
TOSEP(*NONE) 

/* *DAYnn function */ 

&DATEA TOVAR(&DATEO) TOFMT(*YMD) TOSEP(*NONE) 

MSGID(CPFO000) EXEC(GOTO BADDATE) 

&CURDAT TOVAR(&CURDATJA) TOFMT(*YMD) + 
TOSEP(*NONE) 

(&CURDATJA *GT &DATEO) GOTO BADDATE /* Prior */ 

(&CURDATJA *EQ &DATEO) DO /* Current date */ 

((&CURHR *GT &HR) *OR ((&CURHR *EQ &HR) *AND + 
(&CURMIN *GT &MIN))) GOTO BADTIME 

/* Current date */ 

/* Loop to db] apostrophes in the msg text */ 

(%SST(&MSG &FROM 1) *EQ '''') DO /* apos */ 

%SST(&MSGO &TO 2) '''''' /* Double apos */ 

&T0 (&T0 + 2) /* Increment TO index by 2 */ 

/* Found apostrophe */ 

DO /* Not an apostrophe */ 

%SST(&MSGO &TO 1) %SST(&MSG &FROM 1) 

&T0 (&T0 + 1) /* Increment TO index by 1 */ 

/* Not an apostrophe */ 

&FROM (&FROM + 1) /* Increment FROM inx by 1 */ 

(&FROM *LT 100) GOTO NEXT 

/* Build command to add to time file */ 

&TIME (&HR *CAT &MIN *CAT '00') 

&CMD ('SNDMSG MSG(' *CAT '''' *CAT 'From ' + 
*CAT &USER *TCAT ' --- ' *CAT &MSGO *CAT + 
'''' CAT ') TOMSGQ(' *CAT %SST(&MSGQF 1 10) + 
*TCAT '.' *CAT %SST(&MSGQF 11 10) *CAT ')') 

&SBM100 &MSG /* 1st 100 bytes of msg */ 

TIMADD PARM(&DATEO &TIME &CMD &JOB &USER + 
&JOBNBR &SBM100) 

QSNDDTAQ PARM(TIMDTAQ QGPL &FLDLEN 'AA') 


SEQNBR *... ... Ie ssns ee Dist ee ener ee 5 sat Sa B aac ae: 7 


110.00 IF &NOW SNDPGMMSG MSG('Message sent immediately') 
111.00 ELSE SNDPGMMSG MSG('Message will be sent after + 
112.00 time delay') 

113.00 RETURN 

114.00 BADDATE: SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) MSGTYPE(*ESCAPE) + 
115.00 MSGDTA('Date is prior to current system + 
116.00 date or it is invalid') 

117.00 BADTIME: SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) MSGTYPE(*ESCAPE) + 
118.00 MSGDTA('Hour/Minute is less than or + 

119.00 equal to the current system time') 

120.00 ENDPGM 


The program accepts the parameters from the command and determines the message 
queue, job name, and so forth. It ensures that the message queue exists if a specific 
one is named. If the special value *NOW was entered on the HOUR parameter, the 
command definition changed this to **. If this value exists, the current hour and 
minute are used. 


The &DATEI variable contains the DATE parameter as passed by the command. Ifa 
value is entered, it is used as a specific date. If *TODAY (the default) is entered, a 
zero is passed from the command, and the current date is used. If the *DAYnn func- 
tion is used the value passed from the command is a negative value in the form of -1 
to -14. This allows the program to distinguish between an actual date and the 
*DAYNN function. If &DATEI is negative, the current date is converted to a Julian 
format, and the negative value is subtracted from the current date. This has the 
effect of adding the number of days requested. The actual date to be used is 
checked to see if it is valid. If the day requested is the current day, the time must be 
equal to or greater than the current time. 


The message is moved to a separate area one character at a time so the program can 
check every character entered for an apostrophe. If any are found, two apostrophes 
are inserted so that the command will be correctly interpreted when it is run. The 
program builds the SNDMSG command to be run and passes it and control parame- 
ters to the TIMADD program, which adds the request to the TIMFILP file. The 
program sends an entry message to the TIMDTAQ data queue to activate the request- 
processing program. This is done by a call to the QSNDDTAQ IBM-supplied program. 
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The following is the source for the TIMADD RPG command: 


SEQNBR * 25. ses] sae es 2 iahic eis 3: Soe: sie: maine wie DA wee Ose. eens 7 
1.00 F* TIMADD - Adds records to the time file and the special 9s rcd 
2.00 FTIMFILP IF E K DISK A 
3.00 IRQSTIM DS 
4.00 I 1 20HR 
5.00 I 3  4QMIN 
6.00 I 5 60SEC 
7.00 C *ENTRY PLIST 
8.00 C PARM RQSDAT 
9.00 C PARM RQSTIM 

10.00 C PARM CMD 

11.00 C PARM JOB 

12.00 C PARM USER 

13.00 C PARM JOBNBR 

14.00 C PARM SBM100 

15.00 F* Normal add case 

16.00 C '999999' IFNE RQSDAT Normal 
17.00 C 3600 MULT HR NBRSEC Hrs to secs 
18.00 C 60 MULT MIN SAV5N 50 Min to secs 
19.00 C ADD SAV5N NBRSEC 

20.00 C ADD SEC NBRSEC Secs in day 
21.00 C MOVE UDATE ENTDAT Entry date 
22.00 C TIME ENTTIM Entry time 
23.00 C WRITETIMFILR 

24.00 C END Norma] 
25.00 F* Special 9s record - ensure 9s record exists in file 

26.00 C '999999' IFEQ RQSDAT Qs 

27.00 C KEY KLIST 

28.00 C KFLD DLTCOD 

29.00 C KFLD RQSDAT 

30.00 C KEY SETLLTIMFILR 20 IF = 
31.00 C WRITETIMFILR Add 

32.00 C END Qs 

33.00 C SETON 

34.00 C RETRN 


The TIMADD program is used for two different functions. Its normal purpose is to 
add a new request to the TIMFILP file. It also adds the special record of all nines, 
which prevents finding the true end of the file. The program converts the time 
passed into the number of seconds for the day. This field is used as part of the key 
to the file to simplify processing. If a request is made of all nines, the program 
ensures that a matching record exists in the file. If it is not in the file, it is added. 
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SBMTIMJOB Command and Processing Program 
The following is the source for the SBMTIMJOB command: 


SEQNBR *... ... 1 eehbs ceeds Ds gia. “ies SD. ted: meen Ae hea ota By Sut aes Gr wae. Se 7 
1.00 /*PARMS PGM(SBMT IMJOBC) */ 
2.00 /* */ 
3.00 /* Submit time job submits a command to be run at a later */ 
4.00 /* time. The time can be now, a time later today or ona +) 
5.00 /* specific date. */ 
6.00 /* */ 
7.00 /* The CPP is SBMTIMJOBC | 
8.00 /* */ 
9.00 /* A related command is SNDTIMMSG */ 

10.00 /* */ 
11.00 CMD PROMPT('Submit Time Command') 

12.00 PARM RQSDTA TYPE(*CHAR) LEN(256) MIN(1) EXPR(*YES) + 
13.00 PROMPT('Request data:') 

14.00 PARM HOUR TYPE(*CHAR) LEN(2) MIN(1) + 

15.00 RANGE(QO 24) SPCVAL(('*NOW' '**')) + 

16.00 PROMPT('Hour as 24 hr clock or *NOW:') 

17.00 PARM MIN TYPE(*CHAR) LEN(2) DFT(Q0) + 

18.00 RANGE(00 59) + 

19.00 PROMPT('Minute (00-59):') 

20.00 PARM DATE TYPE(*DEC) LEN(6 0) RANGE(000000 999999) + 
21.00 DFT(*TODAY) SPCVAL((*TODAY ©) (*DAY1 -1) + 
22.00 (*DAY2 -2)(*DAY3 -3) (*DAY4 -4) (*DAY5 -5) + 
23.00 (*DAY6 -6)(*DAY7 -7)(*DAY8 -8)(*DAY9 -9) + 
24.00 (*DAY10 -10)(*DAY11 -11)(*DAY12 -12) + 

25.00 (*DAY13 -13)(*DAY14 -14)) + 

26.00 PROMPT('Date (sys fmt) *TODAY *DAYnn:') 
27.00 PARM JOB TYPE(*NAME) LEN(10) DFT(*JOBD) + 

28.00 SPCVAL(*JOBD) EXPR(*YES) + 

29.00 PROMPT('Job name: ') 

30.00 PARM JOBD TYPE(QUAL1) + 

31.00 PROMPT('Job description: ') 

32.00 PARM DSPSBMJOB TYPE(*CHAR) LEN(4) DFT(*YES) + 

33.00 RSTD(*YES) VALUES(*YES *NO) + 

34.00 PROMPT('Allow display by DSPSBMJOB?: ') 

35.00 QUAL1: QUAL TYPE(*NAME) LEN(10) EXPR(*YES) DFT(QBATCH) 
36.00 QUAL TYPE(*NAME) LEN(10) DFT(*LIBL) SPCVAL(*LIBL) + 
37.00 EXPR(*YES) PROMPT('Library: ') 
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The following is the source for the SBMTIMJOBC CL program: 


SEQNBR *... ... DL cede aad Dine tease Si gae, nee Ge ake e-@% Sa ee Ot se eee / 
1.00 /* SBMTIMJOBC - Submit time job - CPP for SBMTIMJOB */ 
2.00 PGM PARM(&RQSDTA &HR &MIN &DATEI &JOB &JOBDF + 
3.00 &WRKSBMJOB) 

4.00 DCL &RQSDTA *CHAR LEN (256) 

5.00 DCL &RLSCMD *CHAR LEN(256) 

6.00 DCL &SBM100 *CHAR LEN(100) 

7.00 DCL &HR *CHAR LEN(2) 

8.00 DCL &MIN *CHAR LEN(2) 

9.00 DCL &DATEI *DEC LEN(6 0) /* Input date */ 

10.00 DCL &JOB *CHAR LEN(10) 

11.00 DCL &JOBDF *CHAR LEN(2Q) /* Full Job description */ 
12.00 DCL &WRKSBMJOB *CHAR LEN(4) 

13.00 DCL &JOBD *CHAR LEN(10) 

14.00 DCL &JOBDLIB *CHAR LEN(10) 

15.00 DCL &TIME *CHAR LEN(6) 

16.00 DCL &DATEO *CHAR LEN(6) /* Output date */ 

17.00 DCL &DATEJA *CHAR LEN(5) /* Julian alpha date */ 
18.00 DCL &DATEJN *DEC LEN( 5 0) /* Julian dec date */ 
19.00 DCL &CURDAT *CHAR LEN(6) /* Current date */ 
20.00 DCL &CURDATJA *CHAR LEN(6) /* Julian current date */ 
21.00 DCL &DAYS *DEC LEN(3 0) 
22.00 DCL &DAYSA *CHAR LEN(3) 
23.00 DCL &YEAR *DEC LEN(2 0) 
24.00 DCL &YEARA *CHAR LEN(2) 
25.00 DCL &LEAP *CHAR LEN(18) VALUE('000408121684889296' ) 
26.00 DCL &FLDLEN *DEC LEN(5 @) VALUE(2) 
27.00 DCL &X *DEC LEN(3 @) VALUE(-1) /* Index to leap */ 
28.00 DCL &ENDYR *DEC LEN(3 0) VALUE(365) 
29.00 DCL &DATEA *CHAR LEN(6) /* Date in alpha */ 
30.00 DCL &CURHR *CHAR LEN(2) 
31.00 DCL &CURMIN *CHAR LEN(2) 
32.00 DCL &WRKSTN *CHAR LEN(10) /* Requester work stn */ 
33.00 DCL &USER *CHAR LEN(10) 
34.00 DCL &JOBNBR *CHAR LEN(6) 
35.00 DCL &NOW *LGL 
36.00 DCL &MSGID *CHAR LEN(7) 
37.00 DCL &MSGDTA *CHAR LEN(132) 
38.00 RTVJOBA JOB(&WRKSTN) USER(&USER) NBR(&JOBNBR) 
39.00 RTVSYSVAL QHOUR RTNVAR(&CURHR) 
40.00 RTVSYSVAL QMINUTE RTNVAR(&CURMIN) 
41.00 RTVSYSVAL QDATE RTNVAR(&CURDAT) 
42.00 IF (&HR *EQ '**') DO /* *NOW converted to ** */ 
43.00 CHGVAR &HR &CURHR 
44.00 CHGVAR &MIN &CURMIN 
45.00 CHGVAR = &NOW ''1' /* Set to ‘on! */ 
46.00 ENDDO /* End *NOW converted to ** */ 

47.00 CHGVAR &DATEA &CURDAT /* Start with today's date */ 
48.00 IF (&DATEI *GT 0) CHGVAR &DATEA &DATEI /* Value */ 
49.00 IF (&DATEI *LT 0) DO /* *DAYnn function */ 

50.00 CVTDAT &DATEA TOVAR(&DATEJA) TOFMT(*JUL) TOSEP(*NONE) 
51.00 CHGVAR &DATEJN &DATEJA /* Change to numeric */ 

52.00 CHGVAR &DATEJN (&DATEJN - &DATEI) /* Sub neg nbr */ 
53.00 CHGVAR &DATEJA &DATEJN /* Change to alpha */ 
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SEQNBR * 
54, 
55. 
56. 

00 

00 

59. 

60. 

00 

00 

00 

00 


57 
58 


61 
62 
63 
64 


65. 
66. 
00 
00 
00 
00 
71. 
72. 
73. 
74, 
75. 
76. 
77. 
78. 
79. 
80. 
81. 
82. 
83. 
84. 
85. 
86. 
87. 
88. 
89. 
90. 
91. 
92. 
93. 
94. 
95. 
96. 
97. 
98. 
99. 
100. 
101. 
102. 
103. 
104. 
105. 
106. 
107. 


67 
68 
69 
70 


00 
00 
00 


00 


00 


00 
00 


LEAPLOOP: 


QCMDCHK: 


RCVMSG: 


CHGVAR 
CHGVAR 
CHGVAR 
CHGVAR 
CHGVAR 
IF 

IF 
GOTO 
ENDDO 
IF 
CHGVAR 
CHGVAR 
CHGVAR 
CHGVAR 
CHGVAR 
CHGVAR 
ENDDO 
CVTDAT 
ENDDO 
CVTDAT 
MONMSG 
CVTDAT 
IF 

IF 

IF 


ENDDO 
CALL 
MONMSG 
MONMSG 
CHGVAR 
CHGVAR 
CHGVAR 
IF 
SBMJOB 


MONMSG 
ENDDO 
IF 
SBMJOB 


ENDDO 
RCVMSG 
IF 


IF 


SNDPGMMSG 


CHGVAR 
CHGVAR 
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/* Check for date which is in the next year */ 
&YEARA %SST(&DATEJA 1 2) /* Extract year */ 
&DAYSA %SST(&DATEJA 3 3) /* Extract days */ 
&YEAR &YEARA /* Change to numeric */ 
&DAYS &DAYSA /* Change to numeric */ 
&X (&X + 2) /* Index to leap year years */ 
(&X *LT 19) DO /* &X is less than 19 */ 
(%SST(&LEAP &X 2) *EQ &YEARA) CHGVAR &ENDYR 366 
LEAPLOOP 
/* & is less than 19 */ 
(&ENDYR *LT &DAYS) DO /* Bump for next year */ 
&DAYS (&DAYS - &ENDYR) /* Subtract end year */ 
&YEAR (&YEAR + 1) /* Increment year */ 
&YEARA &YEAR /* Change to alpha */ 
&DAYSA &DAYS /* Change to alpha */ 
%SST(&DATEJA 1 2) &YEARA /* Move new days */ 
%SST(&DATEJA 3 3) &DAYSA /* Move new year */ 
/* Bump for next year */ 
&DATEJA FROMFMT(*JUL) TOVAR(&DATEA) TOSEP(*NONE) 
/* End of *DAYnn function */ 
&DATEA TOVAR(&DATEO) TOFMT(*YMD) TOSEP(*NONE) 
MSGID(CPFQ0Q0) EXEC(GOTO BADDATE) 
&CURDAT TOVAR(&CURDATJA) TOFMT(*YMD) TOSEP(*NONE) 
(&CURDATJA *GT &DATEO) GOTO BADDATE /* Prior */ 
(&CURDATJA *EQ &DATEO) DO /* Current date */ 
((&CURHR *GT &HR) *OR ((&CURHR *EQ &HR) *AND + 
(&CURMIN *GT &MIN))) GOTO BADTIME 
/* End of current date */ 
QCMDCHK PARM(&RQSDTA 230) /* Check syntax */ 
MSGID(CPF6801) EXEC(GOTO CMDCNL) /* F3 used */ 
MSGID(CPFQ000) EXEC(GOTO BADCMD) 
&SBM100 &RQSDTA 
&JOBD %SST(&JOBDF 1 10) 
&JOBDLIB %SST(&JOBDF 11 10) 
(&JOBD *EQ '*USRPRF') DO /* *USRPRF */ 
JOB(&J0B) JOBD(*USRPRF) + 
RQSDTA(&RQSDTA) HOLD(*YES) + 
DSPSBMJOB (&WRKSBMJOB) 
CPFQOOO EXEC(GOTO BADSBM) 
/* *USRPRF */ 
(&JOBD *NE '*USRPRF') DO /* Not *USRPRF */ 
JOB(&JOB) JOBD(&JOBDLIB/&JOBD) + 
RQSDTA(&RQSDTA) HOLD(*YES) + 
DSPSBMJOB ( &WRKSBMJOB) 
/* Not *USRPRF */ 
MSGID(&MSGID) MSGDTA(&MSGDTA) MSGTYPE(*COMP) 
((&MSGID *NE CPC1221) *AND (&MSGID *NE ' ')) + 
GOTO RCVMSG /* Not CPC 1221 */ 
(&MSGID *EQ CPC1221) THEN(DO) /* SBMJOB cmp] */ 
MSGID(CPC1221) MSGF(QCPFMSG) MSGTYPE(*COMP) + 
MSGDTA(&MSGDTA) /* Send completion msg */ 
&TIME (&HR *CAT &MIN *CAT '0Q') /* Build time */ 
&RLSCMD ('RLSJOB JOB(' *CAT %SST(&MSGDTA 21 6) + 
*TCAT '/' *TCAT %SST(&MSGDTA 11 10) + 
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108.00 *TCAT '/' *TCAT %SST(&MSGDTA 1 10) + 

109.00 *TCAT ')') /* Build RLSJOB command */ 
110.00 CALL TIMADD PARM(&DATEO &TIME &RLSCMD &WRKSTN + 
111.00 &USER &JOBNBR &SBM100) /* Add to TIMFILP */ 
112.00 CALL QSNDDTAQ PARM(TIMDTAQ QGPL &FLDLEN 'AA') 

113.00 IF &NOW SNDPGMMSG MSG('Job will not be held') 
114.00 ELSE SNDPGMMSG MSG('Job will be held until + 

115.00 time delay') 

116.00 ENDDO /* End of CPC1221 completion msg */ 

117.00 ELSE SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) + 

118.00 MSGTYPE(*DIAG) MSGDTA('CPC1221 message + 
119.00 not received from SBMJOB command - job + 
120.00 will not be released') 

121.00 RETURN 

122.00 BADDATE: SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) MSGTYPE(*ESCAPE) + 
123.00 MSGDTA('Date is prior to current system + 
124.00 date or it is invalid') 

125.00 BADTIME: SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) MSGTYPE(*ESCAPE) + 
126.00 MSGDTA('Hour/Minute is less than or + 
127.00 equal to the current system time') 

128.00 BADCMD: SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) MSGTYPE(*ESCAPE) + 
129.00 MSGDTA('Syntax of the command entered + 
130.00 is invalid. See low level messages') 
131.00 BADSBM: SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) MSGTYPE(*ESCAPE) + 
132.00 MSGDTA('SBMJOB command failed. See + 
133.00 See low level messages') 

134.00 CMDCNL: SNDPGMMSG MSGID(CPF6801) MSGF(QCPFMSG) MSGTYPE(*ESCAPE) 
135.00 ENDPGM 


The SBMTIMJOBC program accepts the parameters passed from the command and 
determines the date to be used. The &DATEI variable is handled identically to that 
described in the SNDTIMMSGC program. 


The program calls the system-provided program QCMDCHK to check the syntax of 
the command. If the user had entered the command as ?XXXXx, the QCMDCHK 
program causes the command to be prompted. Two conditions are monitored. 
CPF6801 is signaled if the F3 key is pressed during prompting. If any error occurs, 
the generic CPF0000 signals a syntax error. 


The program uses the SBMJOB command to submit the command. It sends any 
escape messages sent by the SBMJOB command to the user. If none occurs, it receives 
the low level messages and looks for CPF1221. This is the SBMJOB completion 
message, which is sent to the requester. 


The program builds the RLSJOB command to be run and passes it and control 
parameters to the TIMADD program, which adds the request to the TIMFILP file. The 
program sends an entry to the TIMDTAQ data queue to activate the request- 
processing program. This is done by a call to the QSNDDTAQ OS/400-supplied 
program. 


The error handling on the return from QCMDCHK is probably sufficient if most of 
the commands are entered using the ?xxXxxx function to call prompting. You can 
provide better message responses in the event of errors by retrieving the low level 
messages. The CL Programmer’s Guide contains more information on messages. 


4-26 Work Management Guide 


You may want to change this command to allow for a specific time or a delay time 
value. You might want to include a special value in the HOUR parameter, to have 
the command run at 2:00 a.m. the following day (or whenever the system is not 
likely to be used). You may also want to add to the SBMTIMJOB command some of 
the other parameters that are supported on the SBMJOB command. You could also 
provide your own defaults for certain of these parameters and make them identical 
to the current job (for example, LIBL, OUTQ). 
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Request-Processing Program TIMPGMC/TIMPGM 
The following is the source for the TIMPGMC CL program: 


1.00 /* TIMPGMC - Time dependent scheduling - Sbmtd by SBMJOB command */ 


SEQNBR *... ... Rete wer Bis 
2.00 PGM 
3.00 DCL 
4.00 DCL 
5.00 DCL 
6.00 DCL 
7.00 DCL 
8.00 DCL 
9.00 DCL 

10.00 DCL 
11.00 DCL 
12.00 DCL 
13.00 DCL 
14.00 DCL 
15.00 DCL 
16.00 DCL 
17.00 DCL 
18.00 CHGJOB 
19.00 

20.00 CHKOBU 
21.00 MONMSG 
22.00 CPYF 
23.00 

24.00 ENDDO 
25.00 CPYF 
26.00 

27.00 MONMSG 
28.00 CPYF 
29.00 

30.00 MONMSG 
31.00 CLRPFM 
32.00 CALL 
33.00 

34.00 DLTDTAQ 
35.00 MONMSG 
36.00 CRTDTAQ 
37.00 

38.00 

39.00 

40.00 

41.00 /* 

42.00 /* 

43.00 /* 

44.00 /* 

45.00 RTVSYSVAL 
46.00 IF 
47.00 RTVJOBA 
48.00 RTVSYSVAL 
49.00 CVTDAT 
50.00 

51.00 CALL 
52.00 ENDDO 
53.00 /* 
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&FIELD *CHAR LEN(2) 

&FLDLEN *DEC LEN(5 0) VALUE(2) 

&DATEW *CHAR LEN(6) /* Work field */ 
&CURDAT *CHAR LEN(6) /* Current date */ 


&DATNOW *CHAR LEN(6) /* Used by lst job */ 
&DATPRV *CHAR LEN(6) /* Used by 1st job */ 


&ACTION *CHAR LEN(1) VALUE('1') 
&TIME *CHAR LEN(6) 

&YYMMDD *CHAR LEN(6) 

&JOBNBR *CHAR LEN(6) 

&CMD *CHAR LEN(256) 

&WAIT *DEC LEN(5 0) /* Wait time */ 
&WAITA *CHAR LEN(5) /* Wait time */ 


&RTNCDE *CHAR LEN(1) /* Return from RPG */ 


&CMDDTA *CHAR LEN(128) 

LOG(4 0 *NOLIST) 

/* Remove deleted records and initialize 
OBJ(TIMFILP2.QGPL) OBJTYPE(*FILE) 
MSGID(CPF9800) EXEC(DO) /* Not found */ 


a 


TIMFILP TOFILE(TIMFILP2.QGPL) CRTFILE(*YES) + 


NBRRCDS(1) /* Create file for copying * 
/* Not found */ 
FROMFILE(TIMFILP) TOFILE(TIMFILP2.QGPL) + 


/ 


MBROPT(*REPLACE) FROMRCD(1) COMPRESS (*NO) 
MSGID(CPF2817) CMPDTA(CPF2869) /* Ignore 0 */ 


FROMFILE(TIMFILP2.QGPL) TOFILE(TIMFILP) + 


MBROPT(*REPLACE) INCREL((*IF DLTCOD *EQ ' ')) 


MSGID(CPF2817) CMPDTA(CPF2869) /* Ignore 0 */ 


TIMFILP2.QGPL 

TIMADD PARM('999999' ' ' &CMD + 
pe i | 

TIMDTAQ.QGPL 

MSGID(CPF2105) /* Does not exist */ 


TIMDTAQ.QGPL MAXLEN(2) TEXT('Time dependent + 


scheduling data queue') 


GRTOBJAUT TIMDTAQ.QGPL OBJTYPE(*DTAQ) USER(*PUBLIC) + 


AUT (*OBJEXIST) 


/* The following is special code to add a record to the JDAYP 
if it is before 8:00 AM. This is in case the TIMPGMC pgm 
is not running at midnight. The ADDJAYD Pgm does not add 
a record to JDAYP if one already exists for the same date. 


SYSVAL(QTIME) RTNVAR(&TIME) 


(&TIME *LT '080000') DO /* Before 8:00 AM */ 


NBR(&JOBNBR) 
QDATE RTNVAR(&CURDAT) 


DATE(&CURDAT) TOVAR(&YYMMDD) TOFMT(*YMD) + 


TOSEP(*NONE) 
ADDJDAY PARM(&YYMMDD &JOBNBR) 
/* Before 8:00 AM */ 


a 


54. 


00 


ee ere 2 bes eeu oS cake Gael E wed eae OS eae was: tam ee 7 
GOTO TIMPGM /* Check for first due request */ 
/* Wait for a message in TIMDTAQ */ 
WAIT: CHGVAR &WAITA &WAIT 
SNDPGMMSG MSG(&WAITA *CAT ' wait time in seconds') 
CALL QRCVDTAQ PARM(TIMDTAQ QGPL &FLDLEN &FIELD + 
&WAIT) 
/* The following code is to submit a special job at midnight yf 
RTVSYSVAL QDATE RTNVAR(&DATNOW) 
IF (&DATNOW *NE &DATPRV) DO /* 1st job of day */ 
CHGVAR &DATPRV &DATNOW 
/* Must run under profile with all obj auth */ 
SBMJOB JOB(MIDNIGHT) JOBD(MIDNIGHT.TESTARC) + 
USER(*JOBD) RQSDTA('CALL MIDNIGHTC') + 
DSPSBMJOB(*NO) 
ENDDO /* 1st job of day */ 
/* End of special code for midnight job */ 
SNDPGMMSG MSG('Message ' *CAT &FIELD *CAT ' arrived on + 
on TIMDTAQ queue') 
IF (Q@FIELD *EQ 'LR') CHGVAR &ACTION '2' 
TIMPGM: RTVSYSVAL QDATE RTNVAR(&DATEW) 
CVTDAT &DATEW TOVAR(&CURDAT) TOFMT(*YMD) TOSEP(*NONE) 
CALL TIMPGM PARM(&ACTION &RTNCDE &WAIT &CURDAT + 
&CMD) 
IF (@RTNCDE *EQ '1') DO /* Run cmd */ 
/* Write cmd to job log as an audit trail */ 
CHGVAR &CMDDTA %SST(&CMD 1 128) /* 1st half of cmd */ 
SNDPGMMSG MSG(&CMDDTA) 
CHGVAR &CMDDTA %SST(&CMD 129 128) /* 2nd half */ 
IF (&CMDDTA *NE ' ') SNDPGMMSG MSG(&CMDDTA) 
CALL QCAEXEC PARM(&CMD 256) 
MONMSG MSGID(CPF1321) EXEC(SNDMSG MSG('Time + 
Scheduling received CPF1321 (No such job) + 
for ' *CAT %SST(&CMD 1 45)) TOMSGQ(QSYSOPR) ) 
MONMSG MSGID(CPF1349) EXEC(SNDMSG MSG('Time + 
Scheduling received CPF1349 (Not held) + 
for ' *CAT %SST(&CMD 1 45)) TOMSGQ(QSYSOPR) ) 
GOTO TIMPGM /* Check for more to be run */ 
ENDDO /* Run cmd */ 
IF (&@RTNCDE *EQ '2') GOTO WAIT 
/* RTINCDE = 3 is end of pgm - Fall out */ 
ENDPGM 
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The TIMPGMC program begins by copying the TIMFILP file into QTEMP. It then 
copies TIMFILP back from QTEMP, but selects only those records with a blank in the 
DLTCOD field. It ensures that the nines record exists in the TIMFILP file by calling 
the TIMADD program with the special value of all nines. The program ensures the 
TIMDTAQ data queue exists in QGPL. The DLTDTAQ command is used to ensure the 
data queue does not grow beyond the minimal amount of space required. See the 
CL Programmer’s Guide. The program retrieves the current date and calls TIMPGM 
to determine what to do. If the return code is 1, the command in the returned 
parameter should be run. If the return code is 2, no request is due. The TIMPGM 
program calculates the amount of time to wait before the next request is due and it 
uses that value in the parameter list for the QRCVDTAQ program. If the return code 
is 3, the program has received the special LR message and should end. 


Assume that the SBMTIMJoOB has already submitted a held job. When the job is due, 
the TIMPGMC program will attempt to release it by using the RLSJOB command as the 
parameter to CALL QCMDEXC. The MONMSG command for CPF1321 monitors for the 
situation in which the job no longer exists. The MONMSG command for CPF1349 
monitors for the situation in which the job is no longer held. This means the job is 
still on the system but is either active or on the output queue. These situations could 
occur when the job is released independently of the TIMPGMC program or ended by 
the operator. In either case, a message is sent to QSYSOPR. 


Other error conditions would cause the program to end abnormally on the CALL to 
QCMDEXC. For example, the SNDTIMMSG command ensures that the message queue 
exists when the command is entered, but it may not exist when the message is sent. 


If the program abnormally ends, a program dump could be provided by using the 
job description INQMSGRPY parameter. You may wish to add some additional error 
handling. For example, you might choose also to monitor for CPF0000, and if it 
occurs, issue a DMPCLPGM command and send a message to QSYSOPR requesting that 
a programmer investigate. This will keep the program active and still allow problem 
analysis. 
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The following is the source for the TIMPGM RPG program: 


SEQNBR * 
00 
00 
00 
00 
00 


00 


00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
.00 
00 
.00 
00 
.00 
00 


F* TIMPGM - Acts on time functions - Called by TIMPGMC 


FTIMFILP UF E 
TSAVTIM DS 
I 


*ENTRY 


ACTION 


RDAGAN 


CURDAT 


86401 


CURDAT 


TOTSEC 
NBRSEC 


CURSEC 


MOA AMDTMADADAAAAAIADADAIAIAAAAAAAAIQAQAAAIAAAAAIAQAANDAIQANANIQINIIMNIND TM 1 RI re 


* Either past due date or 


* EOF should never occur 


* Action 2 requests end of program 


* Action 1 checks file to see if a record is due 


Riga Dee ah, cans Re any ees Beisie> leave 6 che. wale 7 
K DISK 

1 20HR 

3. 40MIN 

5 60SEC 
PLIST 
PARM ACTION 1 
PARM RTNCDE 1 
PARM WAIT 50 
PARM CURDAT 6 
PARM CMD 256 
IFEQ '2' Action 2 
MOVE '3' RTNCDE End Pgm 
SETON LR Set LR 
RETRN Return 
END Action 2 
SETLLTIMFILR Reset 
TAG RDAGAN 
READ TIMFILR 20 EOF 
IFLT RQSDAT Future day 
EXSR CURSEC Calc TOTSEC 
MOVE '2' RTNCDE Wait 
SUB TOTSEC WAIT End of day 
EXCPTRELEAS Release lock 
RETRN Return 
END Future day 
IFEQ RQSDAT Today 
EXSR CURSEC Calc TOTSEC 
IFLT NBRSEC Not yet 
SUB TOTSEC WAIT Wait secs 
MOVE '2' RTNCDE Wait 
EXCPTRELEAS Release lock 
RETRN Return 
END Not yet 
END Today 

today and past time - run 
MOVE '1' RTNCDE Run 
MOVE 'X' DLTCOD Delete cde 
MOVE UDATE SNTDAT Sent date 
MOVE CURTIM SNTTIM Sent time 
UPDATTIMFILR Update rcd 
RETRN Return 
* Calculate TOTSEC which is seconds used so far today 

BEGSR 
TIME CURTIM 60 Get time 
MOVE CURTIM SAVTIM 6 Move to DS 
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51.00 C 3600 MULT HR TOTSEC 50 Hrs to secs 
52.00 C 60 MULT MIN SAV5N 50 Min to secs 
53.00 C ADD SAV5N TOTSEC Hrs and mins 
54.00 C ADD SEC TOTSEC Total secs 
55.00 C ENDSR 

56.00 OTIMFILR E RELEAS 


The TIMPGM program tests the code for the action to be performed. If the action 
code is 2, the program ends. If the action code is 1, the program accesses the first 
record in the file with a blank deletion code. The SETLL operation is used because 
the file should always be positioned to read the record with the lowest key in the file. 
Any record that has been added with a lower key (an earlier time) is now the first 
record and will be read first. 


If no request is due that day, the program returns a value to wait until the end of the 
day. Ifa request is due that day but is not yet overdue, the program returns the 
difference in terms of number of seconds between the current time and the first 
record. This is used as the WAIT value on the QRCVDTAQ. 


If a request is past the due date or is due today and past the current time, the record 
is updated as processed and the return code is set to cause the command to be run. 


Ending Time-Dependent Scheduling 


The time-dependent scheduling function should be ended by use of the ENDTIMSCH 
command. This command sends a special entry to the TIMDTAQ data queue. 


The following is the source for the ENDTIMSCH command: 


SEQNBR *... ... rm ee ae ee Sci, ate 2 ere Bea aie O° scar aie 7 ee 
1.00 CMD PROMPT('End Time Scheduling') 
2.00 /* CPP is ENDTIMSCHC */ 


The following is the source for the ENDTIMSCHC CL Program: 


SEQNBR *... ... Lt Seca eee 2 wakes “els Swan ere | rr Bi vas wack Oi wat aes Pty 
1.00 PGM 
2.00 DCL &FLDLEN *DEC LEN(5 0) VALUE(2) 
3.00 CALL QSNDDTAQ PARM(TIMDTAQ QGPL &FLDLEN 'LR') 
4.00 SNDPGMMSG MSG('Ending record sent to TIMDTAQ') + 
5.00 MSGTYPE(*COMP) 
6.00 ENDPGM 


Additional Request Commands 
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The sample describes two requester commands for sending messages or submitting 
commands. You may want to add your own commands for specific functions to be 
run or submitted. You could consider using one of sample commands and pro- 
cessing programs as a base and making specific modifications. 
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Chapter 5. Performance Guidelines 


The purpose of this chapter is to give you some general performance tuning informa- 
tion. This chapter will help you understand some of the work management parame- 
ters that affect performance and how to set up and analyze your system. Prior to 
using this chapter, you should set your performance objectives regarding interactive 
throughput, interactive response time, batch job run time, spool throughput, and so 
on. 


Achieving good system performance requires a proper balance among all system 
resources as shown below: 


Tuning - Optimizing/Balancing Resources 


Resource Measurements 


Capacity 
Contention 
Storage Pools 
Fault Rates 


Main Storage 


Contention 
Cycle Time 
Utilization 


System 


Contention 
Utilization 
Capacity 


Volume of Traffic 
Retries 

Line Speeds 
Failures 
Utilization 
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Overutilizing any resource will affect performance. With the proper setting of the 
work management parameters, you can make the best use of each resource. 


This chapter is organized into the following sections: 
e Performance Overview, which describes: 


— Job states and transitions 
— Process access groups (PAG) 
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— Purge attributes 
— Pools, activity levels, and ineligible queue management 
— Time slice 


¢ Performance Commands, which describe the Work with System Status 
(WRKSYSSTS) and Work with Active Jobs (WRKACTJOB) commands 


¢ Basic Tuning, which describes: 


— IPL performance adjustment 

— Estimating the machine pool size 

— Building an activity level for *BASE 

— When to choose more storage pools 

— How to estimate the initial size and activity levels 


¢ Specialized Performance Tuning, which describes more complex tuning environ- 
ments, for example: 


— Multiple pools for interactive or batch environments 
— Communications environments 


If performance tuning is new to you, you should probably just use the first 3 
sections. If you are experienced on performance tuning and have a large environ- 
ment (more than 100 active jobs), you will probably be most interested in “Special- 
ized Tuning” on page 5-20. 


Performance Overview 


Job States 


Jobs running in the system will be in any of the three states shown below: 


Job States/Transitions 


Active 


Wait Ineligible 
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When a job is active, it is in main storage processing work requested by the applica- 
tion. If a job is waiting, it means that the job needs a resource that is not available. 
A job is ineligible when it has work to do, but the system is unable to accept more 
work at that time. 


5-2 Work Management Guide 


Wait States 


When a job is waiting for a resource, it may wait in main storage or it may be 
removed from main storage until the object is available. There are two types of 
waits: short waits and long waits as shown below. 


Job States/Transitions 


Short Wait Active 


Occupies Activity Level 


Not in Activity Level 


Long Wait Ineligible 
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A short wait occurs in main storage and causes one of the available activity level 
positions to be unavailable until the requested resource is available or two seconds 
have ended. If the wait is longer than 2 seconds, it is changed to a long wait and the 
job’s position may be taken by a job with something more productive to do. Some 
typical causes of short waits are: 


e Sending a WRITE to a display with the DFRWRT(*NO) parameter 
e Sending break messages to work stations 
e Specifying RSTDSP(*YES) on display files 


When using remote lines, these types of waits should be avoided because they cause 
the main storage resource to be used inefficiently. 
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Long waits take place outside of main storage and make the job activity level posi- 
tion available to other jobs. Long waits are usually caused by record lock conflicts. 
A specialized form of long wait is called key/think wait as shown below. 


Job States/Transitions 


a cc 


Occupies Activity Level 


Not in Activity Level 


Long Wait Key/Think Wait 


Ineligible 
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This wait also takes place outside the activity level and occurs when a job has com- 
pleted a work assignment and returns to request more work. When the job receives 
a new assignment or gets tired of waiting (times out), it will then attempt to run 
again. If no activity level space is available, the job becomes ineligible. 
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System Objects/Process Access Groups (PAG) 
Each job running in the system is assigned a storage pool. When a job is active, it 
resides in its assigned storage pool. Jobs that are active are referring to many dif- 
ferent system objects. Some of these objects used by jobs are: 


Some Objects Used by Jobs 


| TD 1 
Subfile 
Data 
Areas Work Areas 
f..t— 
System 
Code 


File 


Override 
Information 


Physical 
Files 


Open File Information 


(Open Data Path---ODP) 


Program 
Variables 


Application 
Code 
fe 


Logical 
Files 


As the job uses these objects, they must be in main storage. If they are not in main 
storage, they must be read into main storage from their locations on disk (auxiliary) 
storage. Although many different object types are used, they fall into two main cate- 
gories. The object is either shared by jobs or is unique to a specific job. When an 
object is shared by jobs, only one copy of the object exists. For example, applica- 
tion code that is used by 20 jobs will reside in main storage in only one place but 
will be used by all jobs. However, the variables and data in the application will not 
have the same values for all jobs using the application. These portions of the appli- 
cation and other job unique objects are packaged as an object called a process access 
group (PAG). 
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PAGS 


eS —_ ee om 


Shared by All Jobs 


cs cs rcs cs ee ee ee ee es ee es ee ees ee ee es ee i ee 


Unique to Each Job 


Record Buffers Record Buffers 


File Override 
Information 


File Override 
Information 


Process Access 
Group (PAG) 


Open Data Path Open Data Path 


Program 
Variables 


Program 
Variables 
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Whenever a job is active, its PAG must be in main storage. 


PAG Transfer 


In order to get a job’s PAG into main storage, the system refers to the PURGE param- 
eter. The PURGE parameter is specified in the job class which is resolved when the 
job first enters the system. The value for the PURGE parameter is *YES or *NO. The 
characteristics of these values are: 


e *NO 
— Few nondata base reads per transaction 
— Few writes per transaction 
— Reads and writes transfer few pages 
— May reduce disk utilization 
— Less processing unit per transaction 
— Requires more main storage 
e¢ *YES 
— Adapts to workload/storage size 
— Operates as *YES in storage constrained or balanced workload environ- 
ments 
— Operates as *NO in storage rich or imbalanced workload environments 
— Performs better with small main storage 


In summary, using *YES relieves you from deciding which value to use; but, *NO may 
give you better performance. 
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Activity Levels and Ineligible Queue 
For interactive environments, there are typically more jobs running than there is 
space for them to run. When a job attempts to run, there must be space for the job 
in main storage. To restrict the number of jobs in main storage at the time, a value, 
called the activity level, is specified for each pool in the system. Before a job can 
become active, there must be an available activity level. 


As shown below, when a job leaves a long wait condition, a test is made to deter- 
mine if there is an available activity level. If an activity level is available, the job 

becomes active and begins processing in main storage. If no activity level is avail- 
able, the job becomes ineligible. When a job becomes ineligible, it is placed in the 
ineligible queue until an activity level is available. 


Jobs in Long Wait State 


pn po : _ _ 


Activity Levels Yes 


Full? 


| Ineligible 
Queue 


Activity Level = 5 


Job 1 Job 8 ma Job 27 Job 16 
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The following figure shows how jobs are placed on the ineligible queue. If the job 

entered the long wait condition by other than a lock conflict, it is placed behind all 
other jobs of equal priority already on the ineligible queue. This is called a first-in, 
first-out priority queue. 


Ineligible Queue 


Ineligible Queue 


Job Becoming Ineligible 
After Long Wait 


Job PTY Non-lock Waits 


Lock Waits 
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However, if a job becomes ineligible after a long wait caused by a lock conflict, it is 
placed in front of jobs of equal priority already on the ineligible queue. There are 
two main reasons for this change to normal queue placement: 


e Since the job entered a long wait as a result of a lock conflict, we know it was 
active (in main storage) before the conflict occurred. If the wait was of short 
duration (and many are), you may be able to get the job back into an activity 
level before all of the objects the job was using are removed from main storage. 


e¢ When the job leaving the wait state has been granted the lock, the job now owns 
the object it had been waiting for. If other jobs on the ineligible queue want to 
use the same object, they must wait until the object is once again available. 
Therefore, you want jobs holding locks on objects to use them and make them 
available for other jobs to use. To accomplish this, the job moves ahead of any 
potential requesters. 


By correctly managing the ineligible queue, the system may avoid unnecessary job 
transitions and disk operations. As a result, throughput and response time will 
remain more consistent. 
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Time Slice 


Another of the work management tuning parameters is time slice. The time slice 
value is specified in the job’s class. This value represents the amount of processing 
unit time that a job may use while processing a transaction. It does not represent 
the elapsed time of a transaction. 


If a job fails to complete a transaction in the specified time slice, the following will 
occur: 


e The job’s priority is reduced by 1/128. 


e If no jobs of equal or higher priority are on the ineligible queue, the job is given 
another time slice, left in main storage, and allowed to continue running the 
transaction. 


e If jobs of equal or higher priority are on the ineligible queue, the job running is 
removed from main storage and placed on the ineligible queue. A job from the 
ineligible queue is moved into main storage and processing continues. 


Jobs placed on the ineligible queue as a result of exceeding their time slice value, are 
prioritized according to their original priority. The small reduction in priority will 
affect the job’s ability to use the processing unit, but will not affect its ability to 
return to main storage, as shown below: 


Ineligible Queue 


Ineligible Queue 


Job Becoming Ineligible 
at Timeslice End 


Job PTY Non-lock Waits 


Reduced Priority Jobs not 


Penalized on Ineligible Queue 
RSLS892-0 


Regardless of the number of times the time slice is exceeded, the priority of the job is 
reduced only once. For interactive jobs, priority will be restored to its original value 
at the completion of each transaction. Since batch jobs do not have the concept of 
transactions, they will continue to run at a slightly lower priority until the job ends. 
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Performance Commands 


When you are observing the performance of your system, there are two commands 
that are available to help you: Work with System Status (WRKSYSSTS) and Work 
with Active Jobs (WRKACTIJOB). Also, the Performance Tools Licensed Program 
may be used to help analyze your performance. (The Performance Tools Guide con- 
tains this information.) However, this chapter discusses only the system commands. 


Work with System Status (WRKSYSSTS) Command 


The WRKSYSSTS command displays information about the current status of the 
system. When using the WRKSYSSTS display, you must separate the machine pool 
(Pool 1) from the other pools. Figure 5-1 and Figure 5-2 on page 5-11 show the 
WRKSYSSTS display. 


Work with System Status XXXXXXXX 
xx/xx/xx hhimm:ss 
%* CPU used ...... :  XXX.X Auxiliary storage 

Elapsed time ..... >: XX:XX2XX System... . .. . 4. 2! XXXXXX M 
Jobs in system ... . :  XXXXX S-USEG ¢ & woe we Bale > XXX.XXXX 
% addresses used Total ..... .. . +. !  XXXXXX M 
Permanent ...... > XX.XXX Current unprotect used . : XXXXXX M 
Temporary ..... + !  XX.XXX Max unprotect ... . . :  XXXXXX M 

System Pool Reserved Max DB DB Non-DB Non-DB 


Pool Size (K Size (K) Active Faults Pages Faults Pages 
XX XKKXX | XXXXXX XXX XXX.X -XXX.X RRA XXX. X 


XXXXXX XXXXXX XXX XXX.X XXX.X OXXK.X RK 
XX XXXXXX XXXXXX XXX XXX.X  XXX.X oXXX.X XXX. 
Means XX XXXXXX XXXXXX XXX XXX.X  XXX.X -XXX.X XXX. Attempt 
of Control XX XXXXXX XXXXXX XXX XXX.X  XXX.X oXXK.X —XXK-X to Control 
XX XXXXXX - XXXXXX XXX XXX.X XXX.X XXK.X XXXL 
XX XXXXXX _ XXXXXX XXX XXX.X -XXX.XXXKXLX_XKXLX 


Command 

===> 

F3=Exit Fl1Q=Restart Fl1l=Transition data Fl2=Previous F24=More keys 
(F11=DB data) 
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Figure 5-1. Example of the System Status (WRKSYSSTS) Display 
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Figure 5-1 on page 5-10 shows that our concern in the machine pool is the nondata 
base fault rate. Page faulting in the machine pool affects all jobs on the system. 
Therefore, it is desirable to maintain a low page fault rate in this pool. The guide- 
lines that should be applied are: 


Nondata Base Paging Faults 


Main Storage Size Good Acceptable Poor 
Less than or equal to 12M <2 25 > 5 
More than 12M <1 L=s3 >3 


The only way to affect paging in the machine pool is to adjust the size of the pool. 


Work with System Status XXXXXXXX 
xx/xx/xx hh:mm:ss 


% CPU used ...... 3: + XXX.X Auxiliary storage 

Elapsed time ..... : XX:XX:XX SYSTEM «@ 2 4. woe we 6 OAKAXKM 

Jobs in system .... :  XXXXX % used... we we «© © $ ~~ XXXXXXX 

% addresses used TOCA, oe he ok Ain a we ae oe Be ARK 
Permanent. ..... > XX.XXX Current unprotect used . : XXXXXX M 


Temporary ......: : Max unprotect .... . :  XXXXXX M 


System Pool Reserved Max DB DB Non-DB Non-DB 

Pool Size (K) Size (K) Active Faults Pages Faults Pages 
XX XXXXXX XXXXXX XXX XXX.X — XXX.X 
XX XXXXXX XXXXXX XXX XXX. X 
XX XXXXXX XXXXXX XXX XXX. X 


Pressing the 4 
: [4 
F171 key will a 
go from first 4 
display to = Work with System Status XXXXXXXX 
second display. ¥ xx/xx/xx hhimm:ss salle 
% CPU used ...... >: XXX.X Auxiliary storage 
Elapsed time ..... 3:  XX:XX:XX System... 4... 4 6 « 3 ~~  XXXXXX M 
Jobs in system .... :  XXXXX % USOd 6 ew we ew we EC XMKLXXXX 
% addresses used DOL ew. Sneek ce :  XXXXXX M 
Permanent ...... > XX.XXX Current unprotect used . : XXXXXX M 
Temporary .... .. :  XX.XXX Max unprotect ..... :  XXXXXX 
System Pool Reserved Max Active-> Wait-> Active-> 
Pool Size (K) Size (K) Active Wait Inel Inel 
XX XXXXXX XXXXXX XXX XXX. X XXX.X XXX. X 
XX XXXXXX XXXXXX XXX XXX. X XXX.X XXX.X 
XX XXXXXX XXXXXX XXX XXX. X XXX. X XXX. X 
Means 
of Control RSLS894-1 


Figure 5-2. Example of the System Status (WRKSYSSTS) Display 
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As Figure 5-2 on page 5-11 shows, all other pools require attention to both data 
base and nondata base page faulting rates and the job transitions. The guidelines for 
the faulting rates in these pools are based on the sum of the data base and nondata 
base faults per second. In addition, adjustments can be made for processor speed 
and the PURGE attribute. The general guidelines are: 


Sum of Data Base and Nondata Base Paging Faults 


Attribute/Model Good Acceptable Poor 

PURGE(* YES) <15 [>= 25 > 25 
Models A4, A6, A10, A20 

PURGE(* YES) < 20 20 — 30 > 30 
Models A30, A40 

PURGE(*NO) <25 25 — 30 > 30 


When observing job transitions: 


¢ Wait-to-ineligible transitions need not be 0 all the time. In heavy-use periods, it 
may be advisable to cause jobs to become ineligible in order to avoid excessive 
page fault rates. 


¢ The active-to-ineligible transitions should be 0. If jobs are becoming ineligible, 
either the time slice is too small or the jobs are doing noninteractive type trans- 
actions. 


Remember when using this display that page fault rates are much more important 
than the job transition values. 


There are two methods to accomplish the desired values for pools 2-16. You can 


either increase or decrease the pool size or the activity level. The mechanics of these 
actions are discussed under “Basic Tuning” on page 5-14. 
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Work with Active Jobs (WRKACTJOB) Command 


The WRKSYSSTS command is designed to give you an indication of system perfor- 
mance. The WRKACTJOB command helps you measure your system’s performance. 


CPU % 


The CL Reference contains information on the format and description of the 
WRKACTJOB command. The following examples show the WRKACTIOB displays. 


XXXX Elapsed time: 


Type options, press Enter. 


XX:XX:XX 


Work with Active Jobs 


XXXX 


XXXX 


XX/XX/XX XX:XX:XX 
Active jobs: XXXX 


2=Change 3=Hold 4=End 5=Work with 6=Release 8=Spooled files 
9=Exclude 10=Program stack 11=Locks 
Opt Subsystem/Job User Type CPU = Function Status 
XX  XXXXXXXXXX XXXXXXXXXX XXX XXXXX.X = XXX=-XXXXXXXXXX XXXX 
XX XXXXXXXXXX XXXXXXXXXX XXX XXXXX.X = XXX-XXXXXXXXXX XXXX 
XX XXXXXXXXXX XXXXXXXXXX XXX XXXXX.X = XXX-XXXXXXXXXX XXXX 
XX XXXXXXXXXX XXXXXXXXXX = XXX XXXXX.X = XXX=-XXXXXXXXXX XXXX 
XX XXXXXXXXXX XXXXXXXXXX XXX XXXXX.X  XXX=XXXXXXXXXX XXXX 
XX XXXXXXXXXX XXXXXXXXXX XXX XXXXX.X = XXX=XXXXXXXXXX XXXX 
XX XXXXXXXXXX XXXXXXXXXX XXX XXXXX.X = XXX-XXXXXXXXXX XXXX 
XX XXXXXXXXXX XXXXXXXXXX XXX XXXXX.X = XXX=-XXXXXXXXXX XXXX 
XX XXXXXXXXXX XXXXXXXXXX XXX XXXXX.X  XXX-XXXXXXXXXX XXXX 
More... 
Parameters or command 
===> 
F3=Exit F5=Refresh F1Q=Restart statistics Fll=Display elapsed data 


Fl2=Previous F24=More keys 


Work with Active Jobs 


XXXXXXXX 
XX/XX/XX  XX2XX:2XX 


CPU %: XXXX Elapsed time: XX:XX:XX Active jobs: | XXXX 
Type options, press Enter. 
2=Change 3=Hold 4=End 5=Work with 6=Release 8 =Spooled files 
9=Exclude 10=Program stack 11=Locks 
--------- Elapsed------>-<< 
Opt Subsystem/Job Type Pool Pty CPU Int Rsp Auxt& CPU% 
XX XXXXXXXXXX XXX XX XXX XXXXK.X KXXXX  XX.X 
XX XXXXXXXXXX XXX XX XXX  XXXXX.X XXX  XXX.X  XXXXX = XX.X 
XX XXXXXXXXXX XXX XX XXX  XXXXX.X XXX  XXX.X  XXXXX  XX.X 
XX XXXXXXXXXX XXX XX XXX  XXXXX.X XXX  XXX.X  XXXXX = XX.X 
XX XXXXXXXXXX XXX XX XXX  XXXXX.X XXX  XXX.X  XXXXX XXX 
XX XXXXXXXXXX XXX XX XXX  XXXXX.X XXX  XAXX.X  XRXXXX — XX.X 
XX XXXXXXXXXX XXX XX XXX  XXXXX.X = XXX ~~ -XXX.X 
XX XXXXXXXXXX XXX XX XXX  XXXXX.X XXX  XXX.X  XXXXX  XX.X 
XX XXXXXXXXXX XXX XX XXX XXXXX.X XXX XAXX.X  XXXXX  XX.X 
More... 


Parameters or command 
===> 

F4=Prompt 
F15=System status 


F13=Reset statistics 
F24=More keys 


F9=Retrieve 
F1l6=Resequence 


Fl4=Include group 
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When attempting to observe your system’s performance, both WRKSYSSTS and 
WRKACTIJOB should be used. With each observation period, you should examine and 
evaluate the measures of system performance against the goals you have set. Some 
of the typical measures include: 


e Interactive throughput and response time. Available from the WRKACTIJOB 
display. 

e Batch throughput. Observe the AuxI0 and CPU% values for active batch jobs. 

e Spool throughput. Observe the AuxI0 and CPU% values for active writers. 


Each time you make tuning adjustments, you should measure and compare all of 
your key performance measures. 


Basic Tuning 


This section describes some of the steps taken to initially configure the system pool 
sizes and activity levels. The following topics are discussed and should help you 
tune your system efficiently: 


° IPL performance adjustments 

e Initial machine pool size 

e Choosing your pool configuration 

e Adjustments to pool sizes and activity levels 


Initial Program Load (IPL) Performance Adjustments 
If you would like the system to do initial tuning for you, leave the system value 
QPFRADJ at 1. When you IPL, the system examines the machine configuration and 
the controlling subsystem value. If QPFRADJ is set to 1, the system will use the con- 
figuration information to set the initial pool sizes and activity levels. If the control- 
ling subsystem is QBASE or QCTL, separate pools are set up for spool and interactive 
jobs. 


The IPL tuner sets the following: 


¢ Machine pool size 

e Base pool size and activity level 

e Interactive pool size and activity level 
¢ Spool pool size and activity level 


Batch jobs (including 8/36 environment evoked batch jobs) will run in the base pool. 
If you make any adjustments to the pool size or activity level values, you should 
consider setting QPFRADJ to 0. Otherwise, the values will be reset at the next IPL. If 
you are satisfied with the QPFRADJ values, but change your environment to run night 
batch jobs, you may wish to leave QPFRADI set to 1. 
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Initial Machine Pool Size 
As mentioned earlier, maintaining low page fault rates in this pool will help the 
system perform better. When setting the initial machine pool size, use the following: 


S=M+d+L+F 
where: 


S = Initial machine pool size 

M = Minimum machine pool size (Figure 5-3) 
J = Job space (Figure 5-4) 

= Communications space (Figure 5-5) 

= Functional space (Figure 5-6) 


TT] 


To find the value for the minimum machine pool size, locate your main storage size 
in the table below and use the corresponding value. This is the same value the IPL 
tuner uses to calculate the machine pool size. 


Main Storage Minimum Machine 
Size (M) Pool Size (K) 
4 1175 
8 1625 
12 2050 
16 2400 
20 2750 
24 3050 
28 3350 
32 3650 
36 3950 
40 4250 
48 4800 
64 6200 
80 7600 
96 9000 


Figure 5-3. Minimum Machine Pool Size 


Job space is set aside in the machine pool for each active job in the system. In order 
to get a value for this part of the system, you can use the table below. However, a 
more accurate value will be derived if you: 


e Estimate the maximum number of jobs (including group jobs) that will be active 
at the same time. 


e Add the value you estimated to the value obtained from Figure 5-3 since each 
job requires 1K in the machine pool. 
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Main Storage Model Model Model Model Model Model 


Size (M) A4 A6 A10 A20 A30 A40 
4 20 30 30 oa = = 
8 40 60 60 75 = = 
12 = 70 70 80 = = 
16 = = 75 90 100 - 

20 = ze 80 95 110 = 
24 ” - 85 100 120 = 
28 = se 90 105 130 = 
32 = = 95 110 140 160 
36 = = 100 = 150 = 
40 = = = 115 160 = 
48 = = = = 170 240 
64 = = es = = 320 
80 7 : = - - 380 
96 = = = = — 425 


Figure 5-4. Job Space (K) 


For each line, protocol, line type, and controller, the machine pool must include 
some additional main storage. Figure 5-5 is given as a simple guide to the addi- 
tional storage required. These values are based on estimates of the number and 

types of communications lines that may appear for each model and main storage 
size. However, you are able to do a better job because you know the communi- 

cations configuration of the system. To estimate this: 


1. Add 125K for each line. 
2. Add 100K for each protocol (BSC, SDLC, ASYNC, and so on). 
3. Add 25K for each controller. 


Main Storage Model Model Model Model Model Model 
Size (M) Ad A6 A10 A20 A30 A40 
4 250 250 250 — — — 
8 350 350 350 400 — 
12 — 475 475 525 — oe 
16 — — 550 675 750 — 
20 — —- 650 775 825 — 
24 ~ — 750 850 900 — 
28 — -- 900 950 1000 — 
32 — 1025 1075 1125 1250 
36 — _ 1200 — 1250 -- 
40 — —— — 1350 1375 — 
48 — —— — — 1500 1750 
64 —- _. — — 2200 
80 - _ - — — 2800 
96 -— — — — a 3250 


Figure 5-5. Communications Space (K) 
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Lastly, certain system functions, when active, require additional space in the machine 
pool. If you plan to use any of the functions shown in Figure 5-6 you should add 
the appropriate amount of main storage to the machine pool. The IPL tuner deter- 
mines the functions used from the machine configuration information. 


Function Addition to Machine Pool 
3270 Emulation or Remote 50K 
Attach 
Check sum 5% of main storage size 
Save/Restore 32K 
DBCS 50K 
X.25 48K 
§/36 Environment 350K 
Token-Ring Local Area 250K 
Network 


Figure 5-6. Functional Space 


Choosing Your Pool Configuration 
After you have set your machine pool size, you need to decide what to do with the 
remaining storage. Your basic choices are: 


¢ Do not create any additional pools. 
e Create a separate pool for QINTER and QSPL. 


If you choose to create separate pools for QINTER and QSPL, you should use 

Figure 5-7 to determine the QSPL pool size and activity levels. Then use Figure 5-8 
on page 5-18 to calculate the *BASE pool size and activity levels. The remaining 
storage will be the QINTER pool size. In order to calculate an activity level for the 
QINTER pool, divide the pool size by the value determined from Figure 5-9 on 

page 5-18. The IPL tuner uses the same tables to establish pool sizes and activity 


levels. 
# Writers Size (K) Activity Level 
l 40 ] 
2 70 2 
3 100 3 
4 120 3 
5 140 3 
>5 150 3 


Figure 5-7. QSPL Pool Sizes and Activity Levels 
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Figure 5-8 assumes that interactive work is running at the same time as many batch 
jobs. 


Model A4 Model A6 Model A10 Model A20 Model A30 Model A40 
Main Storage | Pool Size (K)/| Pool Size (K)/ | Pool Size (K)/ | Pool Size (K)/ | Pool Size (K)/ | Pool Size (K)/ 
Size (M) Act Lvl Act Lvl Act Lvl Act Lvl Act Lvl Act Lvl 


[so02 | soo/2 [siz | - | -+| 
ow 73 [row j> [row 7s —_frowys | — +t 


* Pool separation is not possible. 


Figure 5-8. *BASE Pool Sizes and Activity Levels 


Main Storage Size (M) Activity Level Factor (K) 
< 12 300K 
16 — 28 450K 
32 — 48 600K 
64 — 96 900K 


Figure 5-9. QINTER Activity Level Factor 
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Adjustments to Pool Sizes and Activity Levels 
Once you have set your initial pool sizes and activity levels, you should begin to 
observe your system performance. When you are observing performance: 


e Use both WRKSYSSTS and WRKACTIOB. 

¢ Observation intervals should be 5 minutes. 

e The system should be handling normal workloads. Observations during noon 
hour may not give meaningful data. 

e Apply the page fault rate guidelines shown earlier in this chapter. 


If your observations indicate page fault rates outside the stated guidelines, you 
should determine the cause of the high page fault rate. Do not make adjustments to 
tuning if some abnormal condition is causing the high page fault rate. Interactive 
program compiles, communications ERP, OPNQRYF, application errors, and sign-off 
activity are examples of irregular activities which may cause a severe hit to perfor- 
mance. Rather than adjusting the system tuning, you should determine the reasons 
for these activities and try to remove as many as possible from your operating envi- 
ronment. 


If you have decided that the page fault rates in your system are due to natural 
causes, you should take action to adjust your tuning parameters. You will be 
dealing primarily with pool size and activity levels. Also, you should begin by 
tuning the machine pool first. As mentioned earlier, you can only reduce machine 
pool page fault by increasing the size of the pool. Once you have reached the values 
shown earlier as good, you can stop. 


If your machine pool is experiencing very low page fault rates (< 0.4), you should 
decrease the size of the machine pool. If the page fault rate is this low, you may be 
affecting work in some other pools. 


After the machine pool fault rate has been tuned, you now need to focus on the 
other pools in the system. Once again, we have two choices for adjusting these 
pools: size and activity level. 


Adjusting Activity Levels 
Adjusting the activity level may be the most beneficial way to improve the tuning in 
pools 2 through 16. The possible conditions that can exist in these pools are: 


¢ Low fault rate (<15) with a high number of wait-to-ineligible transitions 


° A high fault rate (> 25) with either a high or low number of wait-to-ineligible 
transitions 


e A moderate fault rate (15 — 25) with a moderate number of wait-to-ineligible 
transitions 


In the first situation, the activity level is probably set too low. The paging rate is 
low because only a few jobs are allowed in the pool at the same time. As a result, 
the jobs must wait for an activity level before they can run. Increase the activity 
level by one until the paging rate in the pool reaches the acceptable level. Be certain 
to measure and compare each change so that you can identify that best activity level. 


In the second situation, the activity level is probably set too high. In this case, too 
many jobs are allowed into the pool at the same time. Instead of doing productive 
work in main storage, the jobs must read information to complete their transactions 
many times. Demand for space in the pool is so high that jobs are unable to use 
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their pages before another job has overlaid their information. This condition is 
called thrashing. In order to reduce thrashing, reduce the activity level by one until 
paging returns to an acceptable rate. Once again, it is necessary to measure and 
observe performance after each change. 


The last situation indicates that the activity level may be set right, but the pool size 
is too small. In order to alleviate this case, more storage and, possibly, more activity 
levels should be configured for this pool. This is explained below. 


As you adjust the activity level, you may find that you are cycling through the three 
cases described above. Using your WRKACTJOB command data, select the tuning 
values that have provided the best performance. If performance is still inadequate, 
evaluate the processing unit and disk resource utilizations. 


Adjusting Pool Sizes 


If you have set your activity level at its optimum level, examine the sizes of the pools 
in your system. If you detect a pool with a low fault rate and a low wait-to- 
ineligible count, the pool probably has too much storage. If there are pools that are 
still classified as the last situation (from above), reduce the size of storage-rich pools 
and add it to the pools with less storage. Reductions should be done in decrements 
of 10%. Once again, each change should be measured. 


Reviewing Your Performance 


Once you have set good tuning values, you should periodically review them to ensure 
your system continues to do well. If performance is not satisfactory in spite of your 
best efforts, you should evaluate the capabilities of your configuration. In order to 
meet your objectives, you may need to consider the following: 


e Processor upgrades 

e Additional storage devices and/or controllers 
e Additional main storage 

e Application modification 


By applying one or more of these approaches, you may achieve your objectives. If, 
after a reasonable effort, you are still unable to meet your objectives, you should 
determine if your objectives are realistic for the type of work you are doing. 


Specialized Tuning 
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After you have had some time to observe your system performance, you may want 
to consider more specialized tuning for your environment. Some considerations are: 


e Use PURGE(*NO) for interactive jobs. 

e Separate batch work from *BASE. 

e Use multiple pools for interactive jobs. 
e Use multiple pools for batch jobs. 


When applying these tuning techniques, it is advisable to change the value of 


QPFRADJ to 0. Otherwise, system performance following an IPL may not be what 
you expect. 
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Specifying PURGE(*NO) for Interactive Jobs 


As discussed earlier, the characteristics of interactive jobs are different when 
PURGE(*NO) is specified on the job class rather than PURGE(*YES). When you specify 
PURGE(*YES), the system performs some automatic disk I/O operations whenever the 
job enters and leaves an activity level. These operations may not always be neces- 
sary. PURGE(*NO) performs disk I/O operations only when necessary. In environ- 
ments with sufficient main storage, PURGE(*NO) should be considered. 


To determine if your interactive jobs are candidates for PURGE(*NO), your observa- 
tions should show the following: 


e Page fault rate in QINTER pool of less than 15 
e Few or no wait-to-ineligible transitions 


Then, multiply the number of jobs by 125K. If the result of your multiplication is 
approximately equal to your pool size, set the PURGE attribute to *NO. 


Cc When you change to PURGE(*NO), you are usually giving better performance to 
steady users. Casual users may not benefit in the same manner. Since a casual user 
does not continually enter transactions, the objects used by the job will usually be 
removed from main storage between transactions. If the job’s objects have been 
removed, getting them back to main storage often results in slightly longer response 
time when the PURGE attribute is *NO. For this situation, you may want to set mul- 
tiple interactive pools. 


Separate Batch Work from *BASE 

= To this point, batch jobs have shared *BASE storage with system jobs (for example, 
SCPF, QSYSARB, and subsystem monitors) and system transients (for example, file 
OPEN/CLOSE). As a result, batch jobs compete for space in the *BASE pool. Batch 
performance may be improved if the jobs are moved to a separate pool. The size of 
the pool should be 300K for each job running at the same time. The activity level 
should be set equal to the number of jobs running at the same time. You should 
separate batch jobs only if batch is continually active. Once you have separated 
batch from *BASE, the storage will not be used by anyone in the system when there 
are no batch jobs running. This will not make efficient use of main storage. 


Cc Multiple Pools for Interactive Jobs 


As mentioned above, there are instances where distinct sets of interactive users 
should be isolated. Some examples are: 


e Programmers 
e Users performing office-type functions exclusively 
e Data entry 


In the first two cases, you are attempting to isolate users who are performing the 
same functions. Often, the functions performed by these users are different from the 
functions used by all other users. Also, some of these users may be classified as 
casual users and isolating them will help protect their objects. In the third case, you 
are isolating extremely active users to give the best possible response time for their 
activity. 


eS If you are considering this approach, you need to determine how many users will be 

, put in each pool. Then, after setting the necessary routing entries, you need to cal- 
culate a pool size, activity level, and PURGE attribute for-each pool. If you are 
setting a separate pool for casual users: 
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e Set the PURGE attribute to *YES. 

¢ To calculate the activity level, divide the number of work stations to be routed 
to the pool by 4. 

¢ Multiply the activity level by 300K to set the pool size. 


Remember, once you have separated your work, you no longer have the capability 
of sharing the storage. Also, each pool should be tuned to the optimal pool size and 
activity level. 


Multiple Pools for Batch Jobs 


Summary 


Each batch job may use objects that are different from the objects used by other 
batch jobs in the same pool. Production batch does not use anything that is the 
same as a program compile. Long-running jobs may not perform well if sharing a 
pool with short-running jobs. S36E evokes may disrupt other batch jobs’ perfor- 
mance. If you feel you have some of these situations, you may want to set up mul- 
tiple batch pools. When you separate the pools, set up a pool for each batch job 
type and use 300K for each job in the pool. Each pool should have an activity level 
of | and only one active job. Again, if there is no work being performed in these 
pools, the main storage will not be used by the system to support jobs in other 
pools. 


The system allows you many options for tuning your system. The concepts pre- 
sented here give you some general guidelines, not all the answers. Each system envi- 
ronment is unique and requires you to observe performance and make adjustments 
that are best for your environment. 
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Chapter 6. Collecting Performance Data 


This chapter explains how to collect performance data, and how the collection 
occurs. It also contains reference information that shows the format and content of 
the data base files collected. This information is provided so the user can collect 
performance data collection and write an application to analyze the data. 


Why to Collect Performance Data 
You may choose to collect performance data for any of the following reasons: 
¢ To do analysis with the IBM Performance Analysis licensed program 


¢ To do analysis on another system that has the IBM Performance Analysis 
licensed program installed 


e¢ To gather input for an analysis application that reduces the data into meaningful 
reports 


Preparing to Collect Performance Data 


Before starting data collection, consider what type of data to collect, how often to 
collect it, and when to collect it. 


Data collection may slightly degrade performance of the system due to the time 
involved in collecting the performance data. The amount of degradation is related 
to the amount of data collected, so you should only collect the data you need. 


Three types of data can be collected: 


e System data. This data consists of performance data relating to the following: 
all jobs on the system, devices attached to the system, storage pools, communi- 
cations I/O processors, disk I/O processors, local work station I/O processors, and 
work station response times. 


¢ Communications data. This data includes all of the previously listed system 
data and statistics for the following protocols: binary synchronous, asynchro- 
nous, X.25, token-ring network, and synchronous data link control (SDLC). 


e Trace data. This data includes internal system trace data from the vertical 
microcode trace table. This type of data should not be collected unless it is 
going to be analyzed by the IBM Performance Analysis licensed program. 
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How to Collect Performance Data 


This section explains how to start and end the collection of performance data. 


Starting Performance Data Collection 
The Start Performance Monitor (STRPFRMON) command starts performance data 
collection. Issuing this command submits a batch job to a job queue. When the 
performance monitor batch job is started from the job queue, data collection begins. 
The job continues to collect data until one of the following occurs: 


e The time limit specified for data collection is reached. 
e The End Performance Monitor (ENDPFRMON) command is issued. 


e The performance monitor job is ended abnormally (End Job (ENDJoB), End Sub- 
System (ENDSBS), or End System (ENDSYS) command). 


While the performance monitor job is active, the monitor periodically collects data 
and puts it in the performance data base files. For more information on how data 
collection occurs, see “How Performance Data Collection Occurs” on page 6-4. For 
more information on the Start Performance Monitor (STRPFRMON) command, see 
the CL Reference. 


Collecting System Data Only 
To collect only system data, specify *SYS for the DATA parameter on the STRPFRMON 
command. 


Collecting System and Communications Data 
To collect communications data, specify *ALL for the DATA parameter on the 
STRPFRMON command. 


Note: Communications data is collected in addition to system data, not instead of it. 


Collecting Trace Data 
To collect trace data, you must specify a value other than *NONE for the TRACE 
parameter on the STRPFRMON command. This causes the performance monitor to 
start the trace (using the Trace Internal (TRCINT) command). Turning on the trace 
causes the system to log various activities into an internal trace table. Eventually, 
the trace data is dumped from the internal trace table into a data base file 
(QAPMDMPT). 


Dumping the trace data from the internal trace table into the trace data base file 
also degrades performance. It is probably not a good idea to dump the trace during 
peak activity on a heavily loaded system. So when the TRACE parameter indicates to 
start the trace, you should also consider when the trace should be dumped to the 
data base file. 


The dump trace (DMPTRC) parameter on the STRPFRMON command allows you to 
specify if the dump should take place when the performance monitor ends. The 
DMPTRC parameter is also on the ENDPFRMON command, so that you can override 
what you specified for the DMPTRC parameter on the STRPFRMON command. 


If the trace table is not dumped when the performance monitor ends, it can be 
dumped later with the Dump Trace (DMPTRC) command. This command allows 
dumping of the trace table (which may degrade system performance on heavily 
loaded systems) to be delayed until a time that would not affect other users. If the 
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trace is not dumped when the performance monitor ends, the trace data remains in 
the internal system trace table. If the trace table is cleared for any reason (running 
another system trace clears the trace table), the performance trace data is lost. 
Therefore, it is a good idea to dump the trace table as soon as possible after the 
performance monitor ends. 


Dumping Trace Data 
The DMPTRC command is used to dump information from an internal trace table 
into a data base file. This command allows the dump to be done by the job that 
issued the command, or, by submitting a batch job to a job queue, to have the trace 
dumped by the batch job. 


For more information on the DMPTRC command, see the CL Reference. 


The Internal Trace Table 
The internal trace table has a maximum size of 16M of storage. Before starting any 
traces, the performance monitor sets the trace table size /imit to this maximum value 
to allow the most information possible to be collected. The trace table can use up to 
16M, but is not initially set to that value. If the trace is not started, the size of the 
trace table is not changed. 


After the performance monitor starts the trace, the system continues to log trace 
data until either the trace table fills up or the trace stops (which is done automat- 
ically when the performance monitor ends). If the trace table fills up while the per- 
formance monitor is running (and the performance monitor started the system trace), 
a message is sent to the system operator’s message queue and a user’s message queue 
(if one was specified on the MSGQ parameter of the STRPFRMON command). The 
performance monitor then automatically turns off the trace. At that point, three 
options are available: 


¢ Immediately dump the trace table to a data base file (by using the DMPTRC 
command). Using this option ensures that the trace data is not written over if 
other traces are turned on. However, this approach may degrade performance 
on heavily loaded systems. 


e Wait until the performance monitor ends and have the performance monitor 
dump the trace at that time (this is the default). If another trace is started 
before the performance monitor ends, the data in the internal trace table is 
written over, losing the trace information that the performance monitor 
produced. 


¢ Do not dump the trace when the performance monitor ends. Instead, dump the 
trace at a convenient time with the DMPTRC command. 


Ending Performance Data Collection 
The ENDPFRMON command is used to end performance data collection. Issuing the 
command causes the performance monitor batch job to make a final collection of 
performance data and then end itself. This command should be used instead of the 
ENDJOB, ENDSBS, and ENDSYS commands if you want the final data collected. Only 
the ENDPFRMON command causes the final data to be collected. 


For more information on the ENDPFRMON command, see the CL Reference. 
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How Performance Data Collection Occurs 


Performance data collection occurs when a batch job is submitted to a job queue 
with the STRPFRMON command. No data is collected until the job is started from 
the job queue, so an active job queue should be specified for the JOBQ parameter of 
the STRPFRMON command. 


Although the performance monitor is a batch job, it runs at a higher priority than 
interactive jobs, but lower than system-level jobs. 


After the performance monitor job is started, it opens the data collection data base 
files and performs other initialization functions. After initialization, the performance 
monitor job waits for a data collection interval to occur. 


When the performance monitor collects data, it retrieves performance counters from 
the hardware devices attached to the system. The counters that are stored in the 
data base file for an interval indicate the amount of resources used for just that 
interval (not a summary of the total use since the performance monitor started). 


The performance monitor job collects data for the amount of time specified on the 
STRPFRMON command. When the time limit is reached, the performance monitor 
puts the final performance counters into the data base file (regardless of whether a 
complete interval occurred) and then ends itself. This means that if you specified a 
60-minute interval and a 2-1/2 hour time limit, the data base files contain entries 
placed in the files at 1 hour, 2 hours, and 2-1/2 hours. 


If the performance monitor was started and you want to end it before the time limit 
is reached, you can use the ENDPFRMON command. The ENDPFRMON command puts 
the final performance counters into the data base files, and ends the performance 
monitor batch job (and, if specified, dumps the performance trace into a data base 
file). 


Internal Data Collection Intervals 
A data collection interval is the amount of time during which the performance 
monitor job is active to retrieve data from the system. 


Although you can specify that data is to be placed in the data base files at intervals 
ranging from 5 to 60 minutes (the default is 15 minutes), counter limitations require 
the performance monitor to retrieve performance data from the system every 5 
minutes. Some devices have counters that can wrap (when the counter reaches its 
maximum value, it is reset to zero). The performance monitor can handle one wrap 
when calculating the counts for the interval, but if the counter wraps twice before 
the performance monitor retrieves the counter, the data is lost for one wrap (there is 
no indication that the counter wrapped twice). The maximum amount of time the 
performance monitor can run before risking a double wrap is 5 minutes. Therefore, 
the performance monitor must retrieve the data every 5 minutes to ensure that there 
is no loss of data. 
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When the Data Is Collected 


Regardless of the value specified for the collection interval, the performance monitor 
must collect counters from the devices attached to the system every five minutes. 
Any of these five-minute intervals that do not coincide with the user specified col- 
lection interval are called an internal interval. Any of the five-minute intervals that 
coincide with the user-specified collection intervals are called data base intervals, 
because the performance monitor writes the counters collected for each user-specified 
interval to the performance data base files. 


The following example illustrates the difference between an internal interval and a 
data base interval (assume that 15 minutes was specified for the INTERVAL parameter 
for the STRPFRMON command): 


Data Base Interval Data Base Interval 
Internal Interval Internal Interval 
Internal Interval Internal Interval 
. Time in ae ee’ | oh He ae ok ae a ae I, Ha es, ees | de Be et It sea, ade, Ges Mie a 
Minutes 0 5 10 15 20 25 30 | 
<--------------------------- Collection Period ---------------------------- > 


During internal intervals, the only data that is collected is from the devices attached 
to the system. This data is saved in internal tables until a data base interval occurs, 
when it is written to the data base files. 


During data base intervals, all of the data specified for collection is retrieved from 
the devices and the system, the values for the data base interval are calculated 
(remember each interval shows the amount of use for just that interval), and the 
counters are written to the performance data base files. 


It is also possible for the performance monitor to become active between intervals. 
Certain events on the system cause the performance monitor to be notified when 
they occur. When one of these events occurs, the performance monitor momentarily 
becomes active (usually just long enough to store information about the event in an 
internal table), and then waits for the next collection interval to occur. 


One of these events occurs when a job ends on the system. The only time that the 
performance monitor puts data into the data base file other than at a data base 
interval is when a job ends on the system (an entry is then inserted for that job for 
the final amount of resources used since the last data base interval). 
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Notification of Performance Monitor Status 
While the performance monitor is active, it sends information messages to the system 
operator’s message queue. These messages notify the system operator when the 
status of the performance monitor changes or an error occurs. Typical messages 
sent indicate that: 


e The performance monitor was started (from the job queue). 

e¢ The performance monitor encountered an unexpected error. 

e Another user issued the End Performance Monitor (ENDPFRMON) command. 
¢ The performance monitor has ended. 


Specifying the MSGQ parameter on the STRPFRMON command causes the perfor- 
mance monitor to send messages to the user’s message queue whenever it sends mes- 
sages to the system operator’s message queue. 


Data Base File Management 
The performance monitor uses many different data base files while collecting perfor- 
mance data, but the performance monitor places the data into the same member for 
all the files it uses. If the member specified on the STRPFRMON command does not 
exist when the performance monitor starts, it adds a member by that name to all the 
files it uses. 


Because the default for the member name (MBR) parameter for the STRPFRMON 
command is *GEN (create the member name), it is possible to quickly add many 
members to the performance monitor data base files. When using the default, you 
should periodically delete members in the performance data base files when they are 
no longer used. 


An alternative to deleting members is to delete the files themselves. If the perfor- 
mance monitor does not find a file in the specified library, it creates the file in that 


library and adds the specified member to the file. 


Another alternative is to specify several member names over and over (if running 
every day of the week, name the members after the days of the week). 
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Estimating File Size for Collecting Performance Data 
This section shows how to estimate the file size needed to collect system data and to 
collect system and communications data. 


Collecting System Data Only: To estimate the amount of disk space for collecting 
only system data using the STRPFRMON command and specifying DATA(*SYS), add 
the following: 


55 plus the product of the number of intervals times the sum of: 


1059 System data per interval 

261 Times the average number of jobs active in the interval 

157 Times the number of disk arms 

72 Times the number of pools 

50 Times the average number of local work stations active in the interval 


For example, 


Disk space = 55 + {#intervals x [(1059) + (261 x avg #jobs) + 
(157 x #disk arms) + (72 x #pools) + (50 x #ws)]} 


Collecting System and Communications Data: To estimate the amount of disk 
space for collecting both system and communications data using the STRPFRMON 


command by specifying DATA(*ALL), add the following: 


55 plus the product of the number of intervals times the sum of: 


1059 System data per interval 

261 Times the average number of jobs active in the interval 

157 Times the number of disk actuators 

72 Times the number of storage pools 

50 Times the average number of local work stations active in the interval 
157 Times the average number of SDLC lines active in the interval 

73 Times the average number of asynchronous lines active in the interval 
199 Times the average number of binary synchronous communications (BSC) 


lines active in the interval 
327 Times the average number of X.25 lines active in the interval 


220 Times the average number of token-ring network (TRLAN) lines active in 
the interval 


116 Times the average number of communications controllers active in the 
interval 

520 Times the average number of storage device controllers 

133 Times the average number of twinaxial work station controllers active in 


the interval 
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Content of Performance Data Files 


Terms Used 


The tables on the following pages show the format and content of performance data 
files collected by the system when using data collection commands. They also 
describe some of the relationships between the counters. The file names and 
descriptions used in the tables as follows: 


e¢ Configuration Data (collected once per session): 


File Name Description 

QAPMCONF _ System configuration data 

Performance Data (collected each interval): 

File Name Description 

QAPMSYS System performance data 

QAPMJOBS Job data (one per job) 

QAPMDISK Disk storage data (one per read/write head) 
QAPMPOOL = Main storage data (one per system storage pool) 
QAPMHDLC HDLC statistics (one per link) 

QAPMASYN _ Asynchronous statistics (one per link) 
QAPMBSC Binary synchronous statistics (one per link) 
QAPMX25 X.25 statistics (one per link) 

QAPMECL Token-ring local area network statistics (one per link) 


QAPMCIOP Communications controller data (one per controller) 
QAPMDIOP Storage device controller data (one per controller) 
QAPMLIOP Twinaxial work station controller data (one per controller) 
QAPMRESP _ Local work station response time (one per work station) 

e Trace Data: 
File Name Description 

QAPMDMPT _ System trace data (general description —no field and byte 

detail) 


All the data except for QAPMCONF is collected for each sample. QAPMCONF contains 
system configuration information that is reported only at the beginning of the per- 
formance monitor data collection job. 


The following abbreviations are used in the following tables. 

C = character in the Attributes column. 

PD = packed decimal in the Attributes column. 

IOP = input/output processor or I/O processor. The processors that control the 


activity between the host system and other devices such as disks, display stations, 
and communications lines. 
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DCE = data-circuit-terminating equipment. 
MAC = medium-access control. An entity in the communications IOP. 
LLC = logical link control. An entity in the communications IOP. 


Beacon frame = a frame that is sent when the ring is inoperable. 


File Name: QAPMCONF 
System Configuration File Entries Figure 6-1 lists the various fields in the config- 
uration file entries.: 


Field Name Description Attributes 
GIOP IOP BUS number/address (see note 1) C (1) 
GUNIT Device address (see note 2) C (2) 
GLVL Resource level (see note 3) C (1) 
GKEY See note 4 C (1) 
GDES See note 4 C (10) 


Figure 6-1. System Configuration Data 


Notes: 


1. GIOP is a value only when the containing record is a configuration record. The 
first 3 bits are the bus number (value 0—2) and the remaining 5 bits are the bus 
address (value 0—31). 


2. GUNIT is a value only when the containing record 1s a configuration record. 
3. GLVL = 


1 — Resource is an IOP 
2 — Resource is an I/O adapter or controller 
3 — Resource is a port or device 


GLVL is blank when the previous two fields (GIOP and GUNIT) are blank. 


GKEY GDES 

Performance monitor start date (yy/mm/dd). 

Performance monitor start time (hh:mm:ss). 

Model number (character 4 followed by 6 blanks). 

Main storage size in K-bytes (character 7). 

Communications data collected (Y/N). 

Machine serial number (character 8). 

First response time boundary (PD (3,0)). Lower boundary of the first 

response time monitor bracket. 

8 Second response time boundary (PD (3,0)). Lower boundary of the 
second response time monitor bracket. 

9 Third response time boundary (PD (3,0)). Lower boundary of the third 
response time monitor bracket. 

10 Fourth response time boundary (PD (3,0)). Lower boundary of the 
fourth response time monitor bracket and upper boundary of the last 
response time monitor bracket. 

1] System ASP capacity in bytes (PD (15,0)). Total number of bytes of 
auxiliary storage allocated to the system ASP for the storage of data. 

12 Checksum protection on (Y/N). 


SA OA BR WN 
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L Resource name of the local work station controller. 
C Resource name of the communications IOP. 
D Resource name of the storage IOP. 


File Name: QAPMSYS 
System Interval File Entries The following terms are used in Figure 6-2, and are 
repeated for each group of jobs: 


¢ Number of data base read operations. Total number of physical read operations 
for data base functions. 


e Number of non-data-base read operations. Total number of physical read oper- 
ations for non-data-base functions. 


¢ Number of write operations. Total number of physical write operations. 


¢ Number of print lines. Number of lines written by the program. This number 
does not reflect what is actually printed. Spooled files can be ended, or printed 
with multiple copies. 


¢ Number of data base writes/reads (logical). Number of times the data base 
module was called. This number does not include I/O operations to 
readers/writers, or I/O operations caused by the Copy Spooled File (CPYSPLF) or 
Display Spooled File (DSPSPLF) command. If SEQONLY(*YES) is in effect, these 
numbers show each block of records read, not the number of individual records 
read. 


¢ Number of communications writes/reads (logical). These do not include remote 
work station activity. They include only activity related to OS/400-ICF files when 
the I/O is for a communications device. 


e Number of times PAG was brought. Total number of times the program access 
group (PAG) was brought into main storage after 1t was purged when running 
with PURGE(*YES) parameter. 


¢ Number of times PAG was purged. Total number of times the PAG was purged 
when the job entered a long wait state and was running with PURGE(*YES) 
option. 


Note: Blocked I/O is considered one data base transaction. 
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Field Name 
INTNUM 


DTETIM 


Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the 


INTSEC 


SYSCPU 
SYDPGF 


Directory page faults: Number of times a page of the auxiliary storage direc- 
tory was transferred to main storage for a look-up or an allocation operation. 


SYAPGF 


SYMPGF 


SYMCTR 


SYMCTW 


SYSASP 


SYPRMW 


SYXSRW 


SYEAOT 
SYEAOL 


Description 


Interval number: The nth sample interval since the start of the performance 
monitor job. 


sample interval. 


Elapsed interval seconds: The number of seconds since the last sample 
interval. 


Total system processing unit time used (in milliseconds). 


Access group member page faults: Number of times a page of an object con- 
tained in an access group was transferred to main storage independently of 
the access group. This transfer occurs when the containing access group was 
purged, or because portions of the containing access group are displaced 
from main storage. 


Microcode page faults: Number of times a page of microcode was trans- 
ferred to main storage. 


Microtask read operations: Number of transfers of one or more pages of 
data from auxiliary storage because of a microtask rather than a process. 


Microtask write operations: Number of transfers of one or more pages of 
data from main storage to auxiliary storage because of a microtask rather 
than a process. 


System auxiliary storage pools space available: Number of bytes of space on 
auxiliary storage available for allocation in the system ASP that is not cur- 
rently assigned to machine interface (MI) objects or internal machine func- 
tions. 


Permanent data transferred from main storage: Number of 512-byte blocks 
of permanent data transferred from main storage to the system ASP in auxil- 
lary storage since the last sample. 


Redundancy data transferred from main storage: Number of 512-byte blocks 
of redundant data transferred from main storage to the system ASP in auxil- 
lary storage since the last sample. 


Total number of effective address overflow exceptions. 


Attributes 
PD (5,0) 


C (12) 


PD (7,0) 


PD (9,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (15,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 


Total number of effective address-length overflow exceptions. 


SYBSYC 
SYSIZC 
SYDECD 


Decimal data count: Total number of decimal data exceptions. 


SYSEZC 


Busy count: Total number of busy exceptions. 


Size count: Total number of size exceptions. 


PD (11,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 


Seize count: Total number of seize wait exceptions. 


SYSYNL 
SYASYL 


Asynchronous lock conflict count. 


Figure 


Synchronous lock conflict count. 
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PD (11,0) 
PD (11,0) 
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Field Name 


SYVFYC 
SYAUTH 
SYCHNB 


SYLRT1 


SYLRT2 


SYLRT3 


SYLRT4 


SYLRTS 


SDCPU 


SDRES1 
SDRES2 
SDPRTL 
SDPRTP 
SDSPD 
SDRRT 
SDNEW 
SDTERM 
SDPDBR 
SDPNDB 
SDPWRT 
SDLDBR 
SDLDBW 


Figure 


Description 

Verify count. 

Authority look-up count. 
Channel busy. 

Reserved. 


Transactions in first response time monitor bracket: Total number of local 
work station transactions with response time less than the value of boundary 
1 specified on the STRPFRMON command. 


Transactions in second response time monitor bracket: Total number of 
local work station transactions with response time less than the value of 
boundary 2 and greater than the value of boundary 1 specified on the 
STRPFRMON command. 


Transactions in third response time monitor bracket: Total number of local 
work station transactions with response time less than the value of boundary 
3 and greater than the value of boundary 2 specified on the STRPFRMON 
command. 


Transactions in fourth response time monitor bracket: Total number of local 
work station transactions with response time less than the value of boundary 
4 and greater than the value of boundary 3 specified on the STRPFRMON 
command. 


Transactions in fifth response time monitor bracket: Total number of local 
work station transactions with response time greater than the value of 
boundary 5 specified on STRPFRMON command. 


Total processing unit time used (in milliseconds) by target distributed data 
management (DDM) job. 


Reserved. 

Reserved. 

Total number of print lines of all target DDM jobs. 

Total number of print pages of all target DDM jobs. 

Total count of suspended time of target DDM jobs. 

Total count of time a target DDM job waited during rerouting. 
Number of new target DDM job. 

Number of ended target DDM jobs. 

Total number of physical data base reads by target DDM jobs. 
Total number of physical non-data-base reads by target DDM jobs. 
Total number of physical writes by target DDM Jobs. 

Total number of logical data base reads by target DDM jobs. 


Total number of logical data base writes by target DDM jobs. 
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Attributes 
PD (11,0) 
PD (11,0) 
PD (11,0) 
C (30) 
PD (9,0) 


PD (9,0) 


PD (9,0) 


PD (9,0) 


PD (9,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


Field Name 
SDLDBU 
SDCMPT 
SDCMGT 
SDBRG 
SDPRG 
SWCPU 
SWRES1 
SWRES2 
SWPRTL 
SWPRTP 
SWSPD 
SWRRT 
SWNEW 
SWTERM 
SWPDBR 
SWPNDB 


SWPWRT 
SWLDBR 
SWLDBW 
SWLDBU 


SWCMPT 
SWCMGT 
SWBRG 
SWPRG 
SPCPU 
SPRES1 
SPRES2 
SPPRTL 
SPPRTP 
SPSPD 
SPRRT 
SPNEW 


Figure 


Description 

Total number of miscellaneous data base operations by target DDM jobs. 
Total number of communications writes by target DDM jobs. 

Total number of communications reads by target DDM jobs. 

Number of PURGE(*YES) transactions. 


Number of DYNAMIC PURGE(*NO) transactions. 


Total processing unit time (in milliseconds) used by Pc Support applications. 


Reserved. 

Reserved. 

Total number of print lines of all PC Support application jobs. 

Total number of print pages of all Pc Support application jobs. 

Total time PC Support application jobs were suspended. 

Total time a PC Support applications job waited during rerouting. 
Number of started PC Support application jobs. 

Number of ended Pc Support application jobs. 

Total number of physical data base reads by PC Support application jobs. 


Total number of physical non-data-base reads by pc Support application 
jobs. 


Total number of physical writes by Pc Support application jobs. 
Total number of logical data base reads by Pc Support application jobs. 
Total number of logical data base writes by Pc Support application jobs. 


Total number of miscellaneous data base operations by PC Support applica- 
tion jobs. 


Total number of communications writes by PC Support application jobs. 
Total number of communications reads by PC Support application jobs. 
Number of PURGE(*YES) transactions. 


Number of DYNAMIC PURGE(*NO) transactions. 


Total processing unit time (in milliseconds) used by pass-through target jobs. 


Reserved. 

Reserved. 

Total number of print lines of all pass-through target jobs. 

Total number of print pages of all pass-through target jobs. 

Total count of suspended time of pass-through target jobs. 

Total count of time a pass-through target job waited during rerouting. 


Number of started pass-through target jobs. 
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Attributes 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
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Field Name 
SPTERM 
SPPDBR 
SPPNDB 
SPPWRT 
SPLDBR 
SPLDBW 
SPLDBU 


SPCMPT 
SPCMGT 
SPBRG 
SPPRG 
SMCPU 


SMRES1 
SMRES2 
SMPRTL 
SMPRTP 
SMSPD 
SMRRT 
SMNEW 
SMTERM 
SMPDBR 


SMPNDB 


SMPWRT 
SMLDBR 


SMLDBW 


SMLDBU 


SMCMPT 


SMCMGT 


Description 

Number of ended pass-through target jobs. 

Total number of physical data base reads by pass-through target jobs. 
Total number of physical non-data-base reads by pass-through target jobs. 
Total number of physical writes by pass-through target jobs. 

Total number of logical data base reads by pass-through target jobs. 
Total number of logical data base writes by pass-through target jobs. 


Total number of miscellaneous data base operations by pass-through target 
jobs. 


Total number of communications writes by pass-through target jobs. 
Total number of communications reads by pass-through target jobs. 
Number of PURGE(*YES) transactions. 

Number of DYNAMIC PURGE(*NO) transactions. 


Total processing unit time (in milliseconds) used by MRT jobs (System/36 
environment only). 


Reserved. 

Reserved. 

Total number of print lines of all MRT jobs (System/36 environment only). 
Total number of print pages of all MRT jobs (System/36 environment only). 
Total time MRT jobs (System/36 environment only) were suspended. 

Total time a MRT job (System/36 environment only) waited during rerouting. 
Number of started MRT jobs (System/36 environment only). 

Number of ended MRT jobs (System/36 environment only). 


Total number of physical data base reads by MRT jobs (System/36 environ- 
ment only). 


Total number of physical non-data-base reads by MRT jobs (System/36 envi- 
ronment only). 


Total number of physical writes by MRT jobs (System/36 environment only). 


Total number of logical data base reads by MRT jobs (System/36 environment 


only). 


Total number of logical data base writes by MRT jobs (System/36 environ- 
ment only). 


Total number of miscellaneous data base operations by MRT jobs (System/36 
environment only). 


Total number of communications writes by MRT jobs (System/36 environment 


only). 


Total number of communications reads by MRT jobs (System/36 environment 
only). 


Figure 6-2 (Part 4 of 8). System Performance Data (collected for each interval) 
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Attributes 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


Field Name 


SMBRG 
SMPRG 
S6CPU 


S6RES1 
S6RES2 
S6PRTL 
S6PRTP 
S6SPD 
S6RRT 
S6NEW 
S6TERM 
S6PDBR 
S6PNDB 


S6PWRT 
S6LDBR 
S6LDBW 
S6LDBU 


S6CMPT 
S6CMGT 
SECPU 


SERES1 
SERES2 
SEPRTL 
SESPD 
SERRT 
SENEW 
SETERM 
SEPDBR 
SEPNDB 
SEPWRT 


Description 
Number of PURGE(*YES) transactions. 
Number of DYNAMIC PURGE(*NO) transactions. 


Total processing unit time (in milliseconds) used by System/36 environment 
jobs. 


Reserved. 

Reserved. 

Total number of print lines of all System/36 environment jobs. 

Total number of print pages of all System/36 environment jobs. 

Total time System/36 environment jobs were suspended. 

Total time a System/36 environment job waited during rerouting. 
Number of started System/36 environment jobs. 

Number of ended System/36 environment jobs. 

Total number of physical data base reads by System/36 environment jobs. 


Total number of physical non-data-base reads by System/36 environment 
jobs. 


Total number of physical writes by System/36 environment jobs. 
Total number of logical data base reads by System/36 environment jobs. 
Total number of logical data base writes by System/36 environment jobs. 


Total number of miscellaneous data base operations by System/36 environ- 
ment jobs. 


Total number of communications writes by System/36 environment jobs. 
Total number of communications reads by System/36 environment jobs. 


Total processing unit time (in milliseconds) used by communications batch 
jobs. 


Reserved. 

Reserved. 

Total number of print lines of all communications batch jobs. 
Total time communications batch jobs were suspended. 

Total time a communications batch job waited during rerouting. 
Number of started communications batch jobs. 

Number of ended communications batch jobs. 


Total number of physical data base reads by communications batch jobs. 


Total number of physical non-data-base reads by communications batch jobs. 


Total number of physical writes by communications batch jobs. 


Figure 6-2 (Part 5 of 8). System Performance Data (collected for each interval) 
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Attributes 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
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Field Name 


SELDBR 
SELDBW 
SELDBU 


SECMPT 
SECMGT 
SEBRG 
SEPRG 
SACPU 
SARES1 
SARES2 
SAPRTL 
SAPRTP 
SASPD 
SARRT 
SANEW 
SATERM 
SAPDBR 
SAPNDB 
SAPWRT 
SALDBR 
SALDBW 
SALDBU 
SACMPT 
SACMGT 
SABRG 
SAPRG 
SBCPU 
SBRES1 
SBRES2 
SBPRTL 
SBPRTP 
SBSPD 


Description 


Total number of logical data base reads by communications batch jobs. 
Total number of logical data base writes by communications batch jobs. 


Total number of miscellaneous data base operations by communications 


batch jobs. 


Total number of communications writes by communications batch jobs. 


Total number of communications reads by autostart jobs. 
Number of PURGE(*YES) transactions. 

Number of DYNAMIC PURGE(*NO) transactions. 

Total processing unit time (in milliseconds) used by autostart jobs. 
Reserved. 

Reserved. 

Total number of print lines of all autostart jobs. 

Total number of print pages of all autostart jobs. 

Total time autostart jobs were suspended. 

Total time an autostart job waited during rerouting. 

Number of started autostart jobs. 

Number of ended autostart job. 

Total number of physical data base reads by autostart jobs. 
Total number of physical non-data-base reads by autostart jobs. 
Total number of physical writes by autostart jobs. 

Total number of logical data base reads by autostart jobs. 


Total number of logical data base writes by autostart jobs. 


Total number of miscellaneous data base operations by autostart jobs. 


Total number of communications writes by autostart jobs. 
Total number of communications reads by autostart jobs. 
Number of PURGE(*YES) transactions. 

Number of DYNAMIC PURGE(*NO) transactions. 

Total processing unit time (in milliseconds) used by batch jobs. 
Reserved. | 

Reserved. 

Total number of print lines of all batch jobs. 

Total number of print pages of all batch jobs. 


Total time batch jobs were suspended. 


Figure 6-2 (Part 6 of 8). System Performance Data (collected for each interval) 
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Attributes 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


Field Name 


SBRRT 
SBNEW 
SBTERM 
SBPDBR 
SBPNDB 
SBPWRT 
SBLDBR 
SBLDBW 
SBLDBU 
SBCMPT 
SBCMGT 
SBBRG 
SBPRG 
SICPU 
SITRNT 
SITRNS 
SIPRTL 
SIPRTP 
SISPD 
SIRRT 
SINEW 
SITERM 
SIPDBR 
SIPNDB 
SIPWRT 
SILDBR 
SILDBW 
SILDBU 
SICMPT 
SICMGT 
SIBRG 
SIPRG 
SXCPU 


Description 

Total time a batch job waited during rerouting. 
Number of started batch jobs. 

Number of ended batch jobs. 


Total number of physical data base reads by batch jobs. 


Total number of physical non-data-base reads by batch jobs. 
Total number of physical writes by batch jobs. 

Total number of logical data base reads by batch jobs. 

Total number of logical data base writes by batch jobs. 

Total number of miscellaneous data base operations by batch jobs. 
Total number of communications writes by batch jobs. 

Total number of communications reads by batch jobs. 

Number of PURGE(*YES) transactions. 

Number of DYNAMIC PURGE(*NO) transactions. 

Total processing unit time (in milliseconds) used by interactive jobs. 
Total transaction time by interactive jobs. 

Total number of transactions by interactive jobs. 

Total number of print lines of all interactive jobs. 

Total number of print pages of all interactive jobs. 

Total time interactive jobs were suspended. 

Total time an interactive job waited during rerouting. 

Number of started interactive jobs. 

Number of ended interactive jobs. 

Total number of physical data base reads by interactive jobs. 
Total number of physical non-data-base reads by interactive jobs. 
Total number of physical writes by interactive jobs. 

Total number of logical data base reads by interactive jobs. 


Total number of logical data base writes by interactive jobs. 


Total number of miscellaneous data base operations by interactive jobs. 


Total number of communications writes by interactive jobs. 
Total number of communications reads by interactive jobs. 
Number of PURGE(*YES) transactions. 

Number of DYNAMIC PURGE(*NO) transactions. 


Total processing unit time (in milliseconds) used by start CPF (SCPF) 
jobs/spool reader/spool writer. 


Figure 6-2 (Part 7 of 8). System Performance Data (collected for each interval) 
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Attributes 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
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Field Name 


SXRES1 
SXRES2 
SXPRTL 
SXPRTP 
SXSPD 
SXRRT 
SXNEW 
SXTERM 
SXPDBR 


SXPNDB 


SXPWRT 
SXLDBR 


SXLDBW 


SXLDBU 


SXCMPT 


SXCMGT 


SXBRG 
SXPRG 
SHCPU 
SMPLP 


SMUPL 


SUPLI1 


SMXDU 
SMXDUI 


Description 

Reserved. 

Reserved. 

Total number of print lines of all SCPF jobs/spool reader/spool writer. 

Total number of print pages of all SCPF jobs/spool reader/spool writer. 
Total time SCPF jobs/spool reader/spool writer were suspended. 

Total time a SCPF jobs or spool reader/writer waited during rerouting. 

Number of started SCPF jobs or spool reader/writer. 

Number of ended SCPF jobs or spool reader/writer. 


Total number of physical data base reads by SCPF jobs/spool reader/spool 
writer. 


Total number of physical non-data-base reads by SCPF jobs/spool 
reader/spool writer. 


Total number of physical writes by SCPF jobs/spool reader/spool writer. 


Total number of logical data base reads by SCPF jobs/spool reader/spool 
writer. 


Total number of logical data base writes by SCPF jobs/spool reader/spool 
writer. 


Total number of miscellaneous data base operations by SCPF jobs/spool 
reader/spool writer. 


Total number of communications writes by SCPF jobs/spool reader/spool 
writer. 


Total number of communications reads by SCPF jobs/spool reader/spoo! 
writer. 


Number of PURGE(*YES) transactions. 


Number of DYNAMIC PURGE(*NO) transactions. 


Total processing unit time (in milliseconds) used by microcode/system jobs. 


Machine pool paging: Number of pages transferred in and out of machine 
pool. 


Highest user pool paging: Number of pages transferred in and out of user 
pool. 


Pool with highest paging: Pool number with highest number of pages trans- 


ferred in and out. 
Maximum disk utilization. 


Actuator with maximum utilization. 


Figure 6-2 (Part 8 of 8). System Performance Data (collected for each interval) 
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Attributes 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 


C (2) 


PD (11,0) 
C (4) 


File Names: QAPMJOBS 


Field Name 


INTNUM 


DTETIM 


INTSEC 
JBSSYS 
JBSLIB 
JBNAME 
JBUSER 
JBNBR 
JBACCO 
JBTYPE 
JBSTYP 
JBFLAG 
JBS36E 


JBPOOL 
JBPTY 
JBCPU 
JBRSP 


JBSLC 
JB#TR 


JBDBR 


JBNDB 


JBWRT 
JBAW 


JBWI 


Figure 


JC/JI Data Base File Entries Figure 6-3 lists the various fields in the job completion 


(Jc) and job interval (JI) file. 


Note: In Figure 6-3, job means job/task. 


Description 


Interval number: The nth sample interval since the start of the performance 
monitor job. 


Interval date (yy/mm/dd) for job interval entry and job completion date, and 
time (hh:mm:ss) for job completion entry. 


Elapsed interval seconds. 

Name of the subsystem the job is running in. 
Name of the library the subsystem is in. 

Job name/work station name. 

Job user. 

Job number. 

Job accounting code. 

Job type (A,B,H,I,M,R,S,V,W,X) (see note 1). 
Job subtype (see note 2). 

Job flag (see note 3). 

Is job running in System/36 environment? (Y/N) 
Reserved. 

Job pool. 

Job priority. 

Processing unit time (in milliseconds) used. 


Total transaction time (in seconds): Field has a value other than zero only if 
this is an interactive job. 


Time-slice value (in milliseconds). 


Number of transactions (5250 only): Field has a value other than zero only 
if this is an interactive job. 


Number of data base reads: Total number of physical data base read oper- 
ations for data base functions. 


Number of non-data-base reads: Total number of physical non-data-base 
read operations for non-data-base functions. 


Number of writes: Total number of physical write operations. 


Number of jobs going from active to wait: Total number of transitions from 
active state to wait state. 


Number of jobs going from wait to ineligible: Total number of transitions 
from wait state to ineligible state. 


6-3 (Part | of 2). Job Data (one entry for each job in the system, collected for each interval) 
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Attributes 
PD (5,0) 


C (12) 


PD (7,0) 
C (10) 
C (10) 
C (10) 
C (10) 
C (6) 
C (15) 
C (1) 
C (1) 
C (2) 
C (1) 
C (1) 
C (2) 
C (3) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 


PD (11,0) 
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Field Name 


JBAI 


JBPLN 


JBPPG 


JBPFL 
JBLWT 


JBLRD 


JBDBU 


JBCPT 


JBCGT 


JBSPD 
JBRRT 
JBLND 


JBCUD 


JB2LND 
JB2CUD 
JBBRG 


JBPRG 


JBWSID 


Description 


Number of jobs going from active to ineligible: Total number of transitions 
from active state to ineligible state. 


Number of print lines: Number of lines written by the program. This does 
not reflect what is actually printed. Spooled files can be ended, or printed 
with multiple copies. 


Number of print pages. 
Number of print files. 


Number of data base writes (logical): Number of times the internal data base 
write function was called. This does not include I/O operations to 
readers/writers, or I/O operations caused by the CPYSPLF or DSPSPLF 
command. If SEQONLY(*YES) is specified, these numbers show each block of 
records read, not the number of individual records read. 


Number of data base reads (logical): Number of times the data base module 
was called. This does not include I/O operations to readers/writers, or I/O 
operations caused by the CPYSPLF or DSPSPLF command. If SEQONLY(*YES) is 
specified, these numbers show each block of records read, not the number of 
individual records read. 


Number of miscellaneous data base operations: Updates, deletes, force-end- 
of-data, and releases (logical). 


Number of communications writes: These do not include remote work 
station activity. They include only activity related to OS/400ICF files when the 
1/O is for an OS/400-ICF device. 


Number of communications reads (logical): These do not include remote 
work station activity. They include only activity related to OS/400-ICF files 
when the 1/O is for an OS/400-ICF device. 


Total suspended time (in milliseconds). 
Total time job waited during reroutes (in milliseconds). 


Line description: Name of the communications line this work station and its 
controller is attached to. This is only available for remote work stations. 


Controller description: Name of the controller this work station is attached 
to. 


Secondary line description (pass-through and emulation only). 
Secondary controller description (pass-through and emulation only). 


Number of times PAG was brought in: Total number of times the program 
access group (PAG) was brought into main storage after it was purged when 
running with PURGE(*YES) parameter specified. 


Number of times PAG was purged: Total number of times the program 
access group (PAG) was purged when the job entered a long wait and was 
running with PURGE(*YES) parameter specified. 


Work station address: The address of the work station on which the job is 
running. Byte 1 is the IOP bus number and address and bytes 2 and 3 are the 
device address. 


Figure 6-3 (Part 2 of 2). Job Data (one entry for each job in the system, collected for each interval) 
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Attributes 
PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 
C (10) 


C (10) 


C (10) 
C (10) 
PD (9,0) 


PD (9,0) 


C (3) 


Notes: 


1. Job Types: 
B = Batch 
I = Interactive 
A = Autostart 
R = Spool reader 


= HMC microcode 
= VMC microcode 
2. Job Subtypes: 
M = MRT (System/36 environment only) 
E = Evoke (communications batch) 
3. Job Flags: 
Bit 
0 Pass-through source 
Pass-through target 
2 Emulation active 
4 PC Support application 
5 
6: 


W = Spool writer 

M = Subsystem monitor 
S = System 

X = scpr job 

H 

V 


Target DDM job 
15 Not used 
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File Name: QAPMDISK 
DD File Entries In Figure 6-4, reference is made to an arm as opposed to a disk 
drive. The 9332 offers two configurations: 200M and 400M. The 200M version has 
one enclosure (one disk drive) with one actuator. The 400M version has one enclo- 
sure (one disk drive) with two actuators. The 9335 has one size: 850M with 2 
actuators.: Figure 6-4 lists the fields in the disk data file. 


Field Name Description Attributes 

INTNUM Interval number: The nth sample interval since the start of the performance PD (5,0) 
monitor job. 

DTETIM Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the C (12) 
sample interval. 

INTSEC Elapsed interval seconds: The number of seconds since the last sample PD (7,0) 
interval. 

DIOPID IOP address: An 8-bit field made up of two subfields: C (1) 


JOP bus number: Bits 0, 1, and 2 define the 1/o bus number for 
this IOP. The bus number can range from 0-7. 


IOP bus address: Bits 3, 4, 5, 6, and 7 define the address of this 
IOP on this bus. The bus address can range from 0-31. 


DSUADR Arm unit address: Byte 1 is the device port number for this arm; byte 2 is C (2) 
the arm number for that port. For 9332, byte 2 can be 0 or 1; for the 9335, 0 
to 7; for the 6100, 0. 


DSARM Disk arm number: Specifies the unique identifier of the unit. Each actuator C (4) 
arm on the disk drives available to the machine represents a unit of auxiliary 
storage. The value of the unit number is assigned by the system when the 
unit is allocated to an ASP. 


DSTYPE Disk drive type such as 9332, 9335, or 6100. C (4) 

DSRDS Number of Read Data commands. PD (5,0) 

DSWRTS Number of the Write Data commands. PD (5,0) 

DSSCAN Number of Search String commands: This count is always zero, because PD (5,0) 
Search String commands are not supported for the 9332, 9335, or 6100. 

DSBLKR Number of blocks read: The block length is 520 bytes, which includes 8 PD (11,0) 


bytes of system control information. 


DSBLKW Number of blocks written: The block length is 520 bytes, which includes 8 PD (11,0) 
bytes of system control information. 


DSBUFO Number of buffer overruns: The number of times that data was available to PD (5,0) 
be read into the disk controller buffer from the disk, but the disk controller 
buffer still contained valid data that was not retrieved by the storage device 
controller. Consequently, the disk had to take an additional revolution until 
the buffer was available to accept data. This field is 0 for disk drive type 
6100. 


DSBUFU Number of buffer underruns: The number of times that the disk controller PD (5,0) 
was ready to transfer data to the disk on a write, but the disk controller 
buffer was empty. The data was not transferred in time by the disk IOP to 
the disk controller buffer. The disk was forced to take an extra revolution 
awaiting the data. This field is 0 for disk drive type 6100. 


Figure 6-4 (Part 1 of 3). Disk Storage Data (one for each actuator) 
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Field Name 
DSIDLC 


DSIDLT 


DSSK1 


DSSK2 


DSSK3 


DSSK4 


DSSK5 


DSSK6 


DSQUEL 


DSNBSY 


DSSMPL 


DSCAP 


DSAVL 


Figure 


Description 


Processor idle loop counter (see note 1): The number of times the disk con- 
troller passed through the idle loop. This count is increased differently for 
the 9332 and the 9335. For the 9332, this counter is increased only if the 
disk controller is totally idle (for example, no I/O operations are active). For 
the 9335, even though the disk controller may be idle and the counter gets 
increased, an I/O operation can be active (for example, seek is being per- 
formed). This field is 0 for disk drive type 6100. 


Processor idle loop time (see note 4): The time (in hundredths of microsec- 
onds) to make one pass through the idle loop. This field is 0 for disk drive 
type 6100. 


Number of seeks > 2/3 (see note 2): The number of times the arm traveled 
more than 2/3 of the disk on a seek. 


Number of seeks > 1/3 and < 2/3 (see note 2): The number of times the 
arm traveled more than 1/3 but less than 2/3 of the disk on a seek. 


Number of seeks > 1/6 and < 1/3 (See note 2): The number of times the 
arm traveled more than 1/6 but less than 1/3 of the disk on a seek. 


Number of seeks > 1/12 and < 1/6 (see note 2): The number of times the 
arm traveled more than 1/12 but less than 1/6 of the disk on a seek. 


Number of seeks < 1/12 (see note 2): The number of times the arm traveled 
from its current position but less than 1/12 of the disk on a seek. 


Number of zero seeks (see note 1): The number of times the access arm did 
not physically move on a seek request. The operation may have resulted in a 
head switch. This field is 0 for disk drive type 6100. The number of zero 
seeks will be accumulated in DSSKS. 


Average queue length (see note 5): The number of I/O operations waiting 
service at sample time. This number includes the I/O operation that is in 
progress. 


Number of times arm not busy (see note 5): The number of times there were 
no outstanding I/O operations active at sample time. 


Number of samples taken at two per second (see note 5): The number of 
samples taken at approximately two per second for the DSQUEL and DSNBSY 
fields. 


Drive capacity (in bytes): Total number of bytes of auxiliary storage pro- 
vided on the unit for the storage of objects and internal machine functions 
when the ASP containing it is not under check sum protection. The unit 
reserved system space value is subtracted from the unit capacity to calculate 
this capacity. When the ASP containing the unit is under check sum pro- 
tection, the unit check sum information describes how much of the unit 
capacity is used for protected space, unprotected space, and redundant data. 


Drive available space (in bytes): Total number of bytes of auxiliary storage 
space that is not currently assigned to objects or internal machine functions, 
and therefore is available on the unit if the ASP containing it is not under 
check sum protection. 


6-4 (Part 2 of 3). Disk Storage Data (one for each actuator) 
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Attributes 
PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 
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Field Name 
DSASP 


DSCSS 


DSPCAP 


DSPAVL 


Description Attributes 
ASP number: Specifies the ASP to which this unit is currently allocated. A C (2) 
value of 1 specifies the system ASP. A value from 2 through 16 specifies a 

user ASP. A value of 0 indicates that this unit is currently not allocated. 

Check sum number: Specifies the check sum set to which this unit is cur- C (2) 


rently allocated. A value from 1 through 16 specifies a check sum set. A 
value of 0 specifies that the unit is currently not assigned to a check sum set. 


Permanent storage capacity: Number of bytes of auxiliary storage formatted PD (11,0) 
for storage of protected data on the unit. This field has a value other than 

zero if this unit is allocated to a check sum set. Units not allocated toa 

check sum set contain no permanent storage area. This value does not 

include the size of any data redundancy area which may also be formatted on 


the unit. 


Permanent storage space available: Number of bytes of permanent space on PD (11,0) 
auxiliary storage available for allocation on the unit that is not currently 

assigned to objects of internal machine functions. This field has a value 

other than zero only if this unit is allocated to a check sum set. Units not 

allocated to a check sum set contain no protected storage area. 


Figure 6-4 (Part 3 of 3). Disk Storage Data (one for each actuator) 


Notes: 


l. 


9332/9335 inconsistencies: 

- 9335 updates the idle count only when the processing unit (A) is 
not busy. Disk operations such as seek could be in progress. 
9332 updates the idle count when there is no activity in any of 
its processors. 

- If there is no movement and no head switch, the 9332 does not 
count this operation as a zero seek, the 9335 does. 

- If an operation causes a head switch (starts a read or write 
on one track and end up on another track), the 9332 counts this 
as a zero seek, the 9335 does not. 


. 9335: > 2/3 9332: >= 2/3 
> 1/3 and <= 2/3 >= 1/3 and < 2/3 
> 1/6 and <= 1/3 >= 1/6 and < 1/3 
> 1/12 and <= 1/6 >= 1/12 and < 1/6 
<= 1/12 <1/12 
. DSIDLC and DSIDLT are duplicated across all arms for the same disk controller. 


. The idle loop count and time are used to calculate the storage device controller 


utilization as follows: 


From the interval time, subtract the product of the idle loop count times the idle 
loop time. Divide the result by the interval time. For example: 


IOP utilization = (INTSEC - (DSIDLC x DSIDLT))/ INTSEC 


. The following three counts are extracted from the QAPMDIOP record: 


¢ DSSMPL 
¢ DSQUEL 
¢ DSNBSY 
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6. The following formulas describe how several of the fields in the previous table 
can be used to calculate utilization, response time, service time, and wait time 
for each arm. 


Arm utilization (DSUTL): That part of the total interval expressed as a per- 
centage that the arm was being used for I/O operations. 


DSUTL = Arm Busy - (DSSMPL - DSNBSY) /DSSMPL 


Arm accesses per second (DSAS): The number of reads and writes for this arm 
during the interval. 


DSAS = DSRDS + DSWRTS/INTSEC 


Service time (DSSRVCT): The average time the arm was busy performing I/O 
operations. 


DSSRVCT = DSUTL/DSAS 


Chapter 6. Collecting Performance Data 6-25 


File Name: QAPMPOOL 
Malin Storage Pool File Entries Figure 6-5 lists the fields in the storage pool file. 


Field Name 


INTNUM 


DTETIM 


INTSEC 


PONBR 


POACTL 


POSIZ 
PORES 


PODBF 


PONDBF 


PODBPG 


PONDPG 


POAW 


POW! 


POAI 


Description 


Interval number: The nth sample interval since the start of the performance 
monitor job. 


Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the 
sample interval. 


Elapsed interval seconds: The number of seconds since the last sample 
interval. 


Pool number: Specifies the unique identifier of this pool. The value is from 
1 to 16. 


Pool activity level setting: The maximum number of processes that can be 
active in the machine at the same time. 


Pool size (in kilobytes): The amount of main storage assigned to the pool. 


Pool reserved size (in kilobytes): Specifies the amount of storage from the 
pool that is dedicated to machine functions. 


Pool data base faults: Total number of interruptions to processes (not neces- 
sarily assigned to this pool) that were required to transfer data into the pool 
to permit the MI instruction to process the data base function. 


Pool non-data-base faults: Total number of interruptions to processes (not 
necessarily assigned to this pool) that were required to transfer data into the 
pool to permit the MI instruction to process non-data-base functions. 


Pool data base pages read/written: Total number of pages of data base data 
transferred from auxiliary storage to the pool to permit the instruction to run 
as a consequence of set access state, implicit access group movement, and 
internal machine actions. 


Pool non-data-base pages read/written: Total number of pages of data base 
data transferred from auxiliary storage to the pool to permit the instruction 
to run as a consequence of set access state, implicit access group movement, 
and internal machine actions. 


Number of active to wait transitions: Total number of transitions by pro- 
cesses assigned to this pool from active state to wait state. 


Number of wait to ineligible: Total number of transitions by processes 
assigned to this pool from wait state to ineligible state. 


Number of active to ineligible: Total number of transitions by processes 
assigned to this pool from active state to ineligible state. 


Figure 6-5. Main Storage Data (one for each storage pool) 
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Attributes 
PD (5,0) 


C (12) 


PD (7,0) 


C (2) 


PD (3,0) 


PD (7,0) 
PD (5,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


File Name: QAPMHDLC 


HDLC Fliie Entries In Figure 6-6, statistics are kept on a line basis for the fields in 
the high-level data link control (HDLC) file. 


Field Name Description Attributes 
INTNUM Interval number: the nth sample interval since the start of the performance PD (5,0) 
monitor job. 
DTETIM Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the C (12) 
sample interval. 
INTSEC Elapsed interval seconds: The number of seconds since the last sample PD (7,0) 
interval. 
SHIOP IOP address: An 8-bit field made up of two subfields: C (1) 
IOP bus number: Bits 0, 1, and 2 define the I/O bus number for this 
IOP. The bus number can range from 0-7. 
IOP bus address: Bits 3, 4, 5, 6, and 7 define the address of this IOP 
on this bus. The bus address can range from 0-31. 
SHLND Line description: The name of the description for this line. C (10) 
Reserved. C (10) 
SHLSP Line speed: The speed of the line in bits per second bps. PD (11,0) 
SHBTRN Bytes transmitted: The number of bytes transmitted including bytes trans- PD (11,0) 
mitted again. 
SHBRCV Bytes received: The number of bytes received including all bytes in frames PD (11,0) 
that had any kind of error. 
SHPRCL Protocol type: S for SDLC. C (1) 
SHFTRN Number of frames transmitted (I, supervisory, and frames not numbered) PD (11,0) 
excluding frames transmitted again. 
SHIFTR Number of I-frames transmitted excluding I-frames transmitted again. PD (11,0) 
SHIFRT Number of I-frames transmitted again. PD (11,0) 
SHFRT Number of I, supervisory, and frames not numbered transmitted again. PD (11,0) 
SHEFFR Error-free frames received: The number of I, supervisory, and frames not PD (11,0) 
numbered received without error (whether or not they were transmitted again 
from the remote side). 
SHEFIR Error-free I-frames received: The number of I-frames received without error PD (11,0) 
(whether or not they were transmitted again from the remote side). 
SHFRIE Frames received in error: The number of I, supervisory, and frames not PD (11,0) 


numbered received in error. There are three error possibilities: (1) a supervi- 


sory or I-frame was received with an Nr count that is requesting 


retransmission of a frame, (2) an I-frame was received with an Ns count that 
indicates that frames were missed, (3) a frame is received with one of the fol- 


lowing errors—a frame check sequence error, an abnormal end, a receive 
overrun, or a frame truncated error. 


Figure 6-6 (Part 1 of 2). SDLC/HDLC Statistics 
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Field Name 


SHIFR 


SHRRFT 
SHRRFR 
SHRNRT 
SHRNRR 
SHLNKR 


Description 


Invalid frames received: The number of invalid frames received. These are 
frames received with either: (1) short frame error — frame is less than 32 bits 
or (2) residue error— frame is not on a byte boundary. 


Number of receive ready supervisory frames transmitted. 
Number of receive ready supervisory frames received. 
Number of receive not ready supervisory frames transmitted. 
Number of receive not ready supervisory frames received. 


Data link resets: The number of times a set normal response mode (SNRM) 
was received when the station was already in normal response mode. 


Figure 6-6 (Part 2 of 2). SDLC/HDLC Statistics 
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Attributes 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


File Name: QAPMASYN 


Asynchronous File Entries Figure 6-7 lists the fields in the asynchronous file. 


Field Name 


INTNUM 


DTETIM 


INTSEC 


AIOPID 


ASLND 


ASLSP 
ASBTRN 


ASBRCV 


ASPRCL 
ASPDUR 
ASPDUE 


ASPDUT 


Figure 


Description 


Interval number: The nth sample interval since the start of the performance 
monitor job. 


Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the 
sample interval. 


Elapsed interval seconds: The number of seconds since the last sample 
interval. 


Iop address: An 8-bit field made up of two subfields: 
IOP bus number: Bits 0, 1, and 2 define the I/O bus number for this IOP. 
The bus number can range from 0-7. 


IOP bus address: Bits 3, 4, 5, 6, and 7 define the address of this IOP 
on this bus. The bus address can range from 0-31. 

Line description: The name of the description for this line. 
Reserved. 

Line speed: The speed of this line in bits per second (bps) 


Number of bytes transmitted (data and control characters) including bytes 
transmitted again because of errors. 


Number of bytes received (data and control characters), including characters 
received in error. 


Protocol type: A for asynchronous. 
The total number of protocol data units received. 


The total number of protocol data units received with parity and stop bit 
errors. 


The total number of protocol data units successfully transmitted and the 
data-circuit terminating equipment (DCE) acknowledged. 


6-7. Asynchronous Statistics (one per line) 


Chapter 6. Collecting Performance Data 


Attributes 
PD (5,0) 


C (12) 


PD (7,0) 


C (1) 


C (10) 
C (10) 

PD (11,0) 
PD (11,0) 


PD (11,0) 


C (1) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
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File Name: QAPMBSC 
Binary Synchronous File Entries Figure 6-8 lists the fields in the binary synchro- 


Field Name 


INTNUM 


DTETIM 


INTSEC 


BIOPID 


BSLND 


BSLSP 
BSBTRN 


BSBRCV 


BSPRCL 
BSDCRV 


BSDCRE 


BSDCTR 


BSCRER 


BSLNK 


BSLWA 


Figure 


nous file. 


Description 


Interval number: The nth sample interval since the start of the performance 
monitor job. 


Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the 
sample interval. 


Elapsed interval seconds: The number of seconds since the last sample 
interval. 


IOP address: An 8-bit field made up of two subfields: 
IOP bus number: Bits 0, 1, and 2 define the I/o bus number for this 
IOP. The bus number can range from 0-7. 


IOP bus address: Bits 3, 4, 5, 6, and 7 define the address of this IOP 
on this bus. The bus address can range from 0-31. 

Line description: The name of the description for this line. 
Reserved. 

Line speed: The speed of the line in bits per second (bps). 


Bytes transmitted: The number of bytes (data and control characters) trans- 
mitted, including bytes transmitted again. 


Bytes received: The number of bytes (data and control characters) received 
including bytes received in error. 


Protocol type: B for binary synchronous. 


Data characters received: The number of data characters received success- 
fully (excluding synchronous characters) while in data mode. For feature 
types 2507 and 6150, this value is equal to field BSBRCV. 


Data characters received in error: The number of data characters received 
with a block-check character error while in data mode. For feature types 
2507 and 6150, this value is equal to field BSCRER. 


Data characters transmitted: The number of data characters transmitted suc- 


cessfully while in data mode. For feature types 2507 and 6150, this value is 
equal to field BSBTRN. 


Characters received in error: The number of characters received with a 
block-check character error. 


Negative acknowledgment character received to text sent (see note): The 
number of times the remote station or device did not understand the 
command sent from the host system. 


Wrong acknowledgment character to text sent (see note): The host system 
received an acknowledgment from the remote device that was not expected. 
For example, the system expected an ACKO and received an ACK1. 


6-8 (Part 1 of 3). BSC Statistics (one per link/station) 
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Attributes 
PD (5,0) 


C (12) 


PD (7,0) 


C (1) 


C (10) 
C (10) 

PD (11,0) 
PD (11,0) 


PD (11,0) 


C (1) 
PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


Field Name 


BSLQTS 


BSLINV 


BSLQAK 


BSLTNK 


BSLTWA 


BSLTQT 


BSLTIV 


BSLTQA 


BSLDRA 


BSLEAB 
BSLDFA 


BSLEFA 
BSLDBT 
BSLDBR 
BSLBKR 
BSLBKE 
BSLTRT 
BSLDRT 


Figure 


Description 


Enqueue to text sent (see note): Text was sent by a station and an ENQ char- 
acter was returned. The receiving station expected some form of acknowl- 
edgment, such as an ACKO, ACK1, or NAK. 


Invalid (unrecognized format): One of the delimiter characters that encloses 
the data in brackets being sent/received is invalid (see note). 


Enqueue to acknowledged character: The remote station returned an 
acknowledgment (for example, ACKO) and the host system sent an ENQ char- 
acter. This indicates that the host station did not recognize the acknowledg- 
ment as a valid acknowledgment (see note). 


Negative acknowledgment character received to text sent (total): The 
number of times the remote station did not understand the command sent 
from the host system (see note). 


Wrong acknowledgment character to text sent (total): The host system 
received an acknowledgment from the remote device that was not expected. 
For example, the host system expected an ACKO and received an ACK1 (see 
note). 


Enqueue to text sent (total): Text was sent by a station and an ENQ character 
was returned. The receiving station expected some form of acknowledgment 
such as an ACKO, ACK1, or NAK (see note). 


Invalid (unrecognized format) (total): One of the delimiter characters that 
enclose the data in brackets being sent/received is invalid (see note). 


Enqueue to acknowledged character (total): The remote station returned an 
acknowledgment (for example, ACKO) and the host station sent an ENQ char- 
acter. This indicates that the host station did not recognize the acknowledg- 
ment as a valid acknowledgment (see note). 


Disconnect received: The remote station issued a disconnect with abnormal 
end. This could occur when error recovery did not succeed or the binary 
synchronous job was ended. 


End of transmission (EOT) received (abnormal end): Similar to a disconnect. 


Disconnect received (forward abnormal end): The host station issued a dis- 
connect with abnormal end. This could occur when the error recovery did 
not succeed, or the binary synchronous job was ended. 


EOT received (forward abnormal end): Similar to a disconnect. 

Number of data blocks transmitted. 

Number of data blocks received. 

Number of data blocks transmitted again. 

Number of data blocks received in error. 

Total number of characters transmitted again, including control characters. 


Total number of data characters transmitted again. 
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Attributes 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
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Field Name Description Attributes 


Note: The counters BSLNK through BSLQAK are error recovery counters, and are increased the first time the 
error is detected. The counters BSLTNK to BSLTQA are error recovery counters, and are increased every 
time the error occurs. The same errors are being counted in each set of counters, so the first set 
indicates how many times an error was detected, and the second set indicates how many retries it took 
to recover from the errors. 


Figure 6-8 (Part 3 of 3). BSC Statistics (one per link/station) 
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File Name: QAPMX25 
X.25 File Entries Figure 6-9 lists the fields in the x.25 file.: In Figure 6-9, the XH 
prefix in the label refers to HDLC counters, XL refers to X.25 Logical Link Control 


Field Name 


INTNUM 


DTETIM 


INTSEC 


XIOPID 


XLLND 


XLLSP 
XHBTRN 


XHBRCV 


XHPRCL 
XHFTRN 


XHIFTR 


XHIFRT 
XHFRT 


XMHEFFR 


XHEFIR 


(LLC) counters, and xP refers to Packet Level Control (PLC) counters. 


Description 


Interval number: The nth sample interval since the start of the performance 
monitor job. 


Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the 
sample interval. 


Elapsed interval seconds: The number of seconds since the last sample 
interval. 


IOP address: An 8-bit field made up of two subfields: 
IOP bus number: Bits 0, 1, and 2 define the I/O bus number for this 
IOP. The bus number can range from 0-7. 


IOP bus address: Bits 3, 4, 5, 6, and 7 define the address of this 
IOP on this bus. The bus address can range from 0-31. 

Line description: The name of the description for this line. 
Reserved. 

Line speed: The speed of this line in bits per second (bps). 


Bytes transmitted: The number of bytes transmitted, including bytes trans- 
mitted again. 


Bytes received: The number of bytes received, including all bytes in frames 
that had any kind of error. 


Protocol type: X for X.25. 


Frames transmitted: The number of frames transmitted (I, supervisory, and 
frames not numbered), excluding frames transmitted again. 


I-frames transmitted: The number of I-frames transmitted, excluding 
I-frames transmitted again. 


I-frames transmitted again: The number of J-frames transmitted again. 


Frames transmitted again: The number of I, supervisory, and frames not 
numbered transmitted again. 


Error-free frames received: The number of I, supervisory, and frames not 


numbered received without error (whether or not they were transmitted again 


from the remote side). 


Error-free I-frames received: The number of I-frames received without error 
(whether or not they were transmitted again from the remote side). 


Figure 6-9 (Part | of 3). X.25 Statistics 
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Attributes 
PD (5,0) 


C (12) 


PD (7,0) 


C (1) 


C (10) 
C (10) 
PD (11,0) 
PD (11,0) 


PD (11,0) 


C (1) 
PD (11,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 
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Field Name 
XHFRIE 


XHIFR 


XHRRFT 
XHRRFR 
XHRNRT 
XHRNRR 
XHLNKR 


XLLCID 
XLLSS 


XLLLPS 


XLITR 
XLIRC 
XLIRT 
XLIRE 
XLLXTR 
XLXRC 
XLTT 
XLTR 
XLLJT 
XLLJR 
XLRLD 


Figure 
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Description 


Frames received in error: The number of I, supervisory, and frames not 
numbered received in error. There are three error possibilities: (1) a supervi- 
sory or I-frame was received with an Nr count that is requesting 
retransmission of a frame, (2) an I-frame was received with an Ns count that 
indicates that frames were missed, (3) a frame was received with one of the 
following errors —a frame check sequence error, an abnormal end, a receive 
overrun or a frame truncated error. 


Invalid frames received: The number of invalid frames received. These are 
frames received with either: (1) a short frame error — frame is less than 32 
bits, or (2) a residue error — frame is not on a byte boundary. 


Number of receive ready supervisory frames transmitted. 
Number of receive ready supervisory frames received. 
Number of receive not ready supervisory frames transmitted. 
Number of receive not ready supervisory frames received. 


Link resets: The number of times when a set normal response mode (SNRM) 
was received when the station was already in normal response mode. 


Logical channel id currently in use. 


State of the link station: 
O—Not active 
1—Opened station 
2—Awaiting reconnection 
3—Reconnecting 
4—Closed station 


Logical link protocol state: 
0—Disconnected 
1—Connecting 
2—Connected 
3—Disconnecting 


Interface protocol data units transmitted (LLC level). 
Interface protocol data units received. 

Interface protocol data units transmitted again. 

Interface protocol data units received in error (check sum). 
Number of XIDS transmitted. 

Number of XIDS received. 

Number of tests transmitted. 

Number of tests received. 

Number of LLC rejects transmitted. 

Number of LLC rejects received. 


Number of received LLC protocol data units discarded. 
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Attributes 
PD (11,0) 


PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


C (2) 
C (1) 


C (1) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


Field Name Description Attributes 


XLTO Number of time-outs. PD (11,0) 
XLCED Check sum errors detected. PD (11,0) 
XLSRA Successful recovery attempts. PD (11,0) 
XLRA Recovery attempts. PD (11,0) 
XLRSI Number of reset indications from packet-link control. PD (11,0) 
XLCLS Number of close station indications from packet-link control. PD (11,0) 
XLRNR LLC receive not ready frames received. PD (11,0) 
XPLCID Logical channel ID. C (2) 

XPLSS State of the logical channel. C (1) 


Switched Virtual Circuit: 

0—Logical channel not connected 

1—Logical channel awaiting connection—out 
2—Logical channel awaiting connection—in 
3—Logical channel connected 

4—Logical channel awaiting disconnection 


Permanent Virtual Circuit: 

0—Logical channel not opened 
3—Logical channel in data transfer state 
4—Logical channel being reset 


XPTPT Total packets transmitted. PD (11,0) 
XPTPR Total packets received. PD (11,0) 
XPDPT Data packets transmitted. PD (11,0) 
XPDPR Data packets received. PD (11,0) 
XPRPT Reset packets transmitted. PD (11,0) 
XPROR Reset packets received. PD (11,0) 
XPRRT Restart requests transmitted. PD (11,0) 
XPRIR Restart indications received. PD (11,0) 
XPRNR Receive not ready packets received. PD (11,0) 


Figure 6-9 (Part 3 of 3). X.25 Statistics 
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File Name: QAPMECL 
Token-Ring Network File Entrles Figure 6-10 lists the fields in the token-ring local 
area network file. 


Field Name Description Attributes 
INTNUM Interval number: The nth sample interval since the start of the performance PD (5,0) 
monitor job. 
DTETIM Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the C (12) 
sample interval. 
INTSEC Elapsed interval seconds: The number of seconds since the last sample PD (7,0) 
interval. 
EIOPI IOP address: An 8-bit field made up of two subfields: C (1) 
IOP bus number: Bits 0, 1, and 2 define the 1/o bus number for this 
IOP. The bus number can range from 0-7. 
IOP bus address: Bits 3, 4, 5, 6, and 7 define the address of this 
IOP on this bus. The bus address can range from 0-31. 
ELLND Line description: The name of the description for this line. C (10) 
Reserved. C (10) 
ELLSP Line speed: The line speed expressed in bits per second (bps). PD (11,0) 
ELTFT Total number of Type II frames transmitted. PD (11,0) 
ELTFR Total number of Type II frames received. PD (11,0) 
ELIFT Total number of I-frames transmitted. PD (11,0) 
ELIFR Total number of I-frames received. PD (11,0) 
ELICT Total number of characters transmitted in all I-frames. PD (11,0) 
ELICR Total number number of characters received in all I-frames. PD (11,0) 
ELPRCL Protocol type: E for token-ring network. C (1) 
ELRFT Number of receive not ready frames transmitted. PD (5,0) 
ELRFR Number of receive not ready frames received. PD (5,0) 
ELFFT Number of frame reject frames transmitted. PD (5,0) 
ELFFR Number of frame reject frames received. PD (5,0) 
ELRJFR Number of reject frames received. PD (5,0) 
ELRJFT Number of reject frames transmitted. PD (5,0) 
ELSFT Number of set asynchronous balanced mode extended frames transmitted. PD (5,0) 
ELSFR Number of set asynchronous balanced mode extended frames received. PD (5,0) 
ELDFT Number of disconnect frames transmitted. PD (5,0) 
ELDFR Number of disconnect frames received. PD (5,0) 
ELDMT Number of disconnect mode frames transmitted. PD (5,0) 


Figure 6-10 (Part 1 of 3). Token-Ring Network Counter 
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Field Name 


ELDMR 


ELN2R 


ELTIT 


EMFTR 


EMFRV 
EMMFT 


EMMFR 


EMRIT 


EMRIR 


EMLNE 
EMINE 
EMBRE 


EMAFE 


EMABT 


EMLST 


EMRXC 


EMFCE 


EMFQE 
EMTKE 


EMDBE 
EMDPE 
EMANR 
EMFNC 
EMTSE 


Figure 


Description 
Number of disconnect mode frames received. 


N2 retries end count: This count is updated when the host has attempted to 
contact a station n times and n times the T1 timer ended before the station 
responded. 


Tl timer end count: Number of times the T1 timer ended. See ELN2R 
description. 


Total frames transmitted: Total number of frames (LLC and MAC) trans- 
mitted. 


Total frames received: Total number of frames (LLC and MAC) received. 
MAC frames transmitted: Total number of MAC frames transmitted. 
MAC frames received: Total number of MAC frames received. 


Routing information frames transmitted: Total number of frames (LLC and 
MAC) with a routing-information field transmitted. 


Routing information frames received: Total number of frames (LLC and 
MAC) with a routing-information field received. 


Line error: Code violation of frame-check sequence error. 
Internal error: Adapter internal error. 


Burst error: Burst of same polarity is detected by the physical unit after the 
starting delimiter of a frame or token. 


Address-recognized indicator or frame-copied indicator error: Physical 
control field-extension field error. 


Abnormal ending delimiter: Abnormal ending delimiter transmitted because 
of internal error. 


Lost frame: Physical trailer timer ended while JOA is in transmit stripping 
state. 


Receive congestion: Frame not copied because no buffer was available for 
the IOA to receive. 


Frame-copied error: The frame with a specific destination address was 
copied by another adapter. 


Frequency error on the adapter. 


Token error: The adapter any token timer ended without detecting any 
frame or token. 


Direct memory access bus error: IOP/IOA bus DMA error. 
Direct memory access parity error: IOP/IOA DMA parity error. 
Total number of frames with address not recognized error. 
Total number of frames with frame not copied error. 


Total number of adapter frame transmit or frame strip process errors. 
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Attributes 


PD (5,0) 


PD (5,0) 


PD (5,0) 


PD (5,0) 


PD (5,0) 
PD (5,0) 
PD (5,0) 
PD (5,0) 


PD (5,0) 


PD (5,0) 
PD (5,0) 
PD (5,0) 


PD (5,0) 


PD (5,0) 


PD (5,0) 


PD (5,0) 


PD (5,0) 


PD (5,0) 
PD (5,0) 


PD (5,0) 
PD (5,0) 
PD (5,0) 
PD (5,0) 
PD (5,0) 
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Field Name 
EMUAP 
EMUMF 


EMSFT 
EMTBC 
EMIOA 


EMFDC 
EMSIN 


Description 


Unauthorized access priority: The access priority requested is not authorized. 


Unauthorized MAC frame: The adapter is not authorized to send a MAC 
frame with the source class specified, or the MAC frame has a source class of 
zero, or the MAC frame physical control field attention field is > 1. 


Soft error: Total number of soft errors as reported by the adapter. 
Total number of beacon frames transmitted. 


IOA status overrun: Adapter interrupt status queue overrun, earliest status 
discarded. 


Total number of frames discarded. 


Total number of interrupts that MAC could not decode. 


Figure 6-10 (Part 3 of 3). Token-Ring Network Counter 
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Attributes 
PD (5,0) 
PD (5,0) 


PD (5,0) 
PD (5,0) 
PD (5,0) 


PD (5,0) 
PD (11,0) 


File Name: QAPMCIOP 


Field Name 


INTNUM 


DTETIM 


INTSEC 


CIIOP 


CTIPKT 
CIDMAO 
CIDMAI 
CIOPSR 
CIOPSS 


CISGLR 
CIOPST 
CISLGS 
CIRSTQ 
CIRQDO 
CIRQDI 
CIBNAR 
CIPRCU 


CIIDLC 


CIIDLT 


CIRAMU 


Communications Controller File Entries Figure 6-11 lists the fields in the communi- 


cations controller file. 


Description 


Interval number: The nth sample interval since the start of the performance 
monitor job. 


Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the 
sample interval. 


Elapsed interval seconds: The number of seconds since the last sample 
interval. 


IOP address: An 8-bit field made up of two subfields: 
IOP bus number: Bits 0, 1, and 2 define the I/O bus number for this IOP. 
The bus number can range from 0-7. 


IOP bus address: Bits 3, 4, 5, 6, and 7 define the address of this 

IOP on this bus. The bus address can range from 0-31. 

Total packets transferred. 

Total bytes transmitted from an IOP to the system across the bus. 

Total bytes transmitted to the 10P from the system across the bus. 

OPSTART bus unit message received from another bus unit using normal flow. 


OPSTART bus unit message received from another bus unit using reverse flow 
method 2 (always 0). 


Signals received. 

OPSTARTS sent. 

Signals sent. 

Restart queues sent. 

DMA REQUESTS sent for output of data. 

Direct storage device requests sent for input of data. 
Occurrences of BNA received. 


Processor utilization: The number of fixed-time intervals that this communi- 
cations IOP spent in the idle state. 


Idle loop count (see note): The number of times the communications IOP ran 
an idle loop. This is done when the IOP has no work to perform. This count 
is used with the idle loop time. 


Idle loop time (see note): The time (in hundredths of microseconds) to run 
the idle loop once. 


Available direct-access storage (in bytes): The number of bytes of free direct- 
access storage in the IOP. The free direct-access storage will probably be non- 
contiguous because of fragmentation. 


Figure 6-11. Communications Controller IOP Data (one for each communications controller) 
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Attributes 
PD (5,0) 


C (12) 


PD (7,0) 


C (1) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 


PD (11,0) 
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Note: The idle loop count and time are used to calculate the communications IOP 
utilization as follows: 


From the interval time, subtract the product of the idle loop count times the 
idle loop time. Divide the result by the interval time. For example: 


IOP utilization = (INTSEC - (CIIDLC * CIIDLT))/ INTSEC 
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File Name: QAPMDIOP 
Storage Device Controller File Entries Figure 6-12 lists the fields in the storage 


Field Name 
INTNUM 


DTETIM 


INTSEC 


DIIOP 


DITIDLC 


DIIDLT: 


DIRIDO 


DISMP0 


DIQLNO 


DINRQO 


DIRID1 
DISMP1 
DIQLNI 
DINRQ! 
DIRID2 
DISMP2 
DIQLN2 
DINRQ?2 
DIRID3 


device controller file. 


Note: In Figure 6-12, device means disk. 


Description 


Interval number: The nth sample interval since the start of the performance 
monitor job. 


Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the 
sample interval. 


Elapsed interval seconds: The number of seconds since the last sample 
interval. 


IOP address: An 8-bit field made up of two subfields: 
IOP bus number: Bits 0, 1, and 2 define the 1/O bus number for this 
IOP. The bus number can range from 0-7. 


IOP bus address: Bits 3, 4, 5, 6, and 7 define the address of this 
IOP on this bus. The bus address can range from 0-31. 


Idle loop count (see note): The number of times the disk controller IOP ran 
an idle loop. This is done when the IOP has no work to perform. This count 
is used with the idle loop time. 


Idle loop time (see note): The time (in hundredths of microseconds) to run 
the idle loop once. 


Device 0 resource name: Device resource name used to refer to this device. 
The storage devices are attached on these ports, and there are 16 ports. 


Number of sample of device 0: The number of times during the data col- 
lection interval that the device 0 queue was sampled to see if any I/O requests 
were waiting for service. 


Device 0 queue length: The number of I/O requests waiting for service on the 
device 0 queue at sample time. 


No-request-serviced count: The number of times that no I/O requests were 
waiting for service when the queue was sampled. 


Device 1 resource name. 
Number of samples on device 1. 
Device 1 queue length. 
No-request-serviced count. 
Device 2 resource name. 
Number of samples on device 2. 
Device 2 queue length. 
No-request-serviced count. 


Device 3 resource name. 


Figure 6-12 (Part 1 of 3). Storage Device Controller IOP Data (one for each controller) 
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Attributes 
PD (5,0) 


C (12) 


PD (7,0) 


C (1) 


PD (11,0) 


PD (11,0) 


C (8) 


PD (11,0) 


PD (11,0) 


PD (11,0) 


C (8) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 
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Field Name 


DISMP3 
DIQLN3 
DINRQ3 
DIRID4 
DISMP4 
DIQLN4 
DINRQ4 
DIRID5 
DISMP5 
DIQLNS 
DINRQS 
DIRID6 
DISMP6 
DIQLN6 
DINRQ6 
DIRID7 
DISMP7 
DIQLN7 
DINRQ7 
DIRID8 
DISMP8 
DIQLN8 
DINRQS8 
DIRID9 
DISMP9 
DIQLN9 
DINRQ9 
DIRIDA 
DISMPA 
DIQLNA 
DINRQA 
DIRIDB 
DISMPB 


Figure 6-12 (Part 2 of 3). Storage Device Controller IOP Data (one for each controller) 


Description 

Number of samples on device 3. 
Device 3 queue length. 
No-request-serviced count. 
Device 4 resource name. 
Number of samples on device 4. 
Device 4 queue length. 
No-request-serviced count. 
Device 5 resource name. 
Number of samples on device 5. 
Device 5 queue length. 
No-request-serviced count. 
Device 6 resource name. 
Number of samples on device 6. 
Device 6 queue length. 
No-request-serviced count. 
Device 7 resource name. 
Number of samples on device 7. 
Device 7 queue length. 
No-request-serviced count. 
Device 8 resource name. 
Number of samples on device 8. 
Device 8 queue length. 
No-request-serviced count. 
Device 9 resource name. 
Number of samples on device 9. 
Device 9 queue length. 
No-request-serviced count. 


Device 10 resource name. 


Number of samples on device 10. 


Device 10 queue length. 
No-request-serviced count. 


Device 11 resource name. 


Number of samples on device 11. 
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Attributes 
PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 


Field Name 


DIQLNB 
DINRQB 
DIRIDC 
DISMPC 
DIQLNC 
DINRQC 
DIRIDD 
DISMPD 
DIQLND 
DINRQD 
DIRIDE 
DISMPE 
DIQLNE 
DINRQE 
DIRIDF 
DISMPF 
DIQLNF 
DINRQF 
DITPDK 
DIDMAO 
DIDMAI 
DIOPSR 
DIOPSS 


DISGLR 
DIOPST 
DISGLS 
DIRSTQ 
DIRQDO 
DIRQDI 
DIBNAR 


Description 

Device 11 queue length. 
No-request-serviced count. 
Device 12 resource name. 
Number of samples on device 12. 
Device 12 queue length. 
No-request-serviced count. 
Device 13 resource name. 
Number of samples on device 13. 
Device 13 queue length. 
No-request-serviced count. 
Device 14 resource name. 
Number of samples on device 14. 
Device 14 queue length. 
No-request-serviced count. 
Device 15 resource name. 
Number of samples on device 15. 
Device 15 queue length. 
No-request-serviced count. 

Total packets transferred. 

Total bytes transmitted from the IOP to the system across the bus. 


Total bytes transmitted to the IOP from the system across the bus. 


OPSTART bus unit message received from another bus unit using normal flow. 


OPSTART bus unit message received from another bus unit using reverse flow 
method 2 (always 0). 


Signals received. 

OPSTARTS sent. 

Signals sent. 

Restart queues sent. 

Direct storage device requests sent for output of data. 
Direct storage device requests sent for input of data. 


Occurrences of BNA received. 


Figure 6-12 (Part 3 of 3). Storage Device Controller IOP Data (one for each controller) 
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Attributes 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
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File Name: QAPMLIOP 


Field Name 


INTNUM 


DTETIM 


INTSEC 


LIIOP 


LIRIDC 
LITPKT 
LIDMAO 
LIDMAI 
LIOPSR 
LIOPSS 


LISGLR 
LIOPST 
LISGLS 
LIRSTQ 
LIRQDO 
LIRQDI 
LIBNAR 
LIIOQC 


LISQC 


LIAQC 


Twinaxlal IOP Data File Entries Figure 6-13 lists the fields in the twinaxial IOP data 


file. 


Description 


Interval number: The nth sample interval since the start of the performance 
monitor job. 


Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the 
sample interval. 


Elapsed interval seconds: The number of seconds since the last sample 
interval. 


IOP address: An 8-bit field made up of two subfields: 
IOP bus number: Bits 0, 1, and 2 define the 1/o bus number for 
this IoP. The bus number can range from 0-7. 


IOP bus address: Bits 3, 4, 5, 6, and 7 define the address of this 
IOP on this bus. The bus address can range from 0-31. 

Resource ID of controller: The resource ID of the IOP. 

Total packets transferred. 

Total bytes transmitted from the IOP to the system across the bus. 


Total bytes transmitted to the IOP from the system across the bus. 


OPSTART bus unit message received from another bus unit using normal flow. 


OPSTART bus unit message received from another bus unit using reverse flow 
method 2. 


Signal bus unit message received from another bus unit. 
OPSTARTS sent to another bus unit using reverse flow method 2. 
Signals sent to another bus unit. 

Restart queues bus unit message sent to another bus unit. 
Direct storage device requests sent for output of data. 

Direct storage device requests sent for input of data. 
Occurrences of BNA received. 


Wait-on-1/O queue count: The number of I/O requests on the wait-on-I/O 
queue at sample time. The wait-on-I/O queue holds 1/0 requests that are 
being processed or waiting to be processed. 


Suspend queue count: The number of elements on the suspend queue at 
sample time. 


Active queue count: The number of elements on the active queue at sample 


time. The active queue holds I/O requests that were sent from the host system 


and were not yet sent to the wait-on-I/O queue. 


Figure 6-13 (Part 1 of 2). Twinaxial IOP Data (one for each work station controller) 
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Attributes 
PD (5,0) 


C (12) 


PD (7,0) 


C (1) 


C (8) 

PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 
PD (11,0) 


PD (11,0) 


PD (11,0) 


Field Name 
LITWIU 


LISMPL 


LIIDLC 


LIIDLT 


Description 


Twinaxial use count: The number of times when the wait-on-I/O queue was 
sampled and the count was not zero (I/O in progress). If this value is divided 
by the sample count, the result (times 100) is the percentage of time when I/O 
is occurring. 


Sample count: The number of times during the snapshot interval that the 
various IOP queues were sampled. 


Idle counts (see note): The number of times the work station IOP ran an idle 
loop. This is done when the Iop has no work to perform. This count is used 
with the idle loop time. 


Idle loop time (times 0.01 microsecond): The time (in hundredths of micro- 
seconds) to run the idle loop once (see note). 


Figure 6-13 (Part 2 of 2). Twinaxial IOP Data (one for each work station controller) 


Attributes 
PD (5,0) 


PD (5,0) 


PD (11,0) 


PD (5,0) 


Note: The idle loop count and idle loop time are used to calculate the work station 


IOP utilization as follows: 


From the interval time, subtract the product of the idle loop count times the 
idle loop time. Divide the result by the interval time. For example: 


IOP utilization = (INTSEC - (LIIDLC x LIIDLT))/ INTSEC 
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File Name: QAPMRESP 


Field Name 


INTNUM 


DTETIM 


INTSEC 


LRIOP 


LRWSN 
LRBKT1 


LRBKT2 


LRBKT3 


LRBKT4 


LRBKT5 


LRWSID 


Local Work Station Response Time File Entries Figure 6-14 lists the fields in the RI 


file. 


Description 


Interval number: The nth sample interval since the start of the performance 
monitor job. 


Interval date (yy/mm/dd) and time (hh:mm:ss): The date and time of the 
sample interval. 


Elapsed interval seconds: The number of seconds since the last sample 
interval. 


IOP address: An 8-bit field made up of two subfields: 
IOP bus number: Bits 0, 1, and 2 define the 1/0 bus number for 
this 10P. The bus number can range from 0-7. 


IOP bus address: Bits 3, 4, 5, 6, and 7 define the address of this IOP 
on this bus. The bus address can range from 0-31. 
Work station name: The external name that identifies the work station. 


Transactions in first response time monitor bracket: The number of trans- 


actions from 0 to n seconds for this work station during the snapshot interval. 


The n value is the response time monitor 1 bracket upper limit, and is speci- 
fied when the performance monitor is started by the STRPRFMON command. 
A transaction is defined as the time from when the keyboard locked because 
the Enter key or a function key was pressed to the time when the keyboard is 
unlocked because the display is refreshed. 


Transactions in second response time monitor bracket: The number of trans- 
actions between the response time monitor | and response time monitor 2 
limits. 

Transactions in third response time monitor bracket: The number of trans- 
actions between the response time monitor 2 and response time monitor 3 
limits. 


Transactions in fourth response time monitor bracket: The number of trans- 
actions between the response time monitor 3 and response time monitor 4 
limits. 


Transactions in fifth response time monitor bracket: The number of trans- 
actions above (longer) than the response time monitor 4 limit. 


Work station ID: Byte 1 is the port number and byte 2 is the station number 
of this work station. 


Figure 6-14. Local Work Station Response Time (one for each station) 
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Attributes 
PD (5,0) 


C (12) 


PD (7,0) 


C (1) 


C (10) 
PD (7,0) 


PD (7,0) 


PD (7,0) 


PD (7,0) 


PD (7,0) 


C (2) 


c 


Chapter 7. System Values and Network Attributes 


This chapter describes system values and network attributes by first giving a 
summary of the different system values divided by type and then detailed 
descriptions of the system values. A table showing the network attributes and where 
more information about each one can be obtained is shown at the end of the 
chapter. 


System values contain specifications that can be used to control or change the 
overall operation of your system. System values are not objects and cannot be 
passed as parameter values like CL variables. 


A system value can be placed in a CL variable for use in a CL program using the 
Retrieve System Value (RTVSYSVAL) command. (The CL Programmer’s Guide con- 
tains more information on using CL variables in programs.) 


System Value Summary 


System values must be enclosed in apostrophes under three conditions: 


e If the system value specified is a character string with embedded blanks 

e If numeric values or special characters are specified for character type system 
values 

e If the system value is a date or time value 


Seven of the system values, QACGLVL, QCHRID, QCMNRCYLMT, QSYSLIBL, 
QUPSDLYTIM, QUSRLIBL, and QIPLDATTIM may be lists. To separate items in the list, 
use blanks and enclose the entire list in apostrophes. If there is only one item in the 
list, you do not need apostrophes. The QUPSDLYTIM system value is a list of two 
items but only the first item is used when a Change System Value (CHGSYSVAL) 
command is run. The second item, if specified, is ignored. 


Three other values, QCTLSBSD, QSTRUPPGM, and QUPSMSGQ, may be qualified with a 
library name. If the system values are qualified, use blanks to separate the name 
and library, and enclose the value in apostrophes (for example, ‘QSBSD QLIB’). Apos- 
trophes are necessary only when the library name or *LIBL is specified with the 
object name. If the library name is not specified or *LIBL is specified for the library, 
the library list is used to locate the object, and the library where the object is found 
is stored in the system value. 


Note: When object names are specified for system values, the lowercase letters in the 
names are always changed to uppercase even when they are in apostrophes. 
This means that you should not use lowercase letters in the names of objects 
or libraries that you may want to specify on any of the system values. 
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The following is a summary of the system values and the initial values shipped with 


the system. 


Date and Time System Values 


Initial 


Name Value Description 
QDATE System date 
QYEAR Year 
QMONTH Month of the year 
(not used for Julian 
dates) 
QDAY Day of the month (day of the year if 
the system date format is Julian) 
QLEAPADJ 0 Leap year adjustment 
QTIME Time of day 
QHOUR Hour of the day 
QMINUTE Minute of the hour 
QSECOND Second of the minute 


1! For Julian dates 


2 For tenths, hundredths, and thousandths of a second 


Editing System Values 


Initial 
Name Value Description 
QCURSYM ‘S$’ Currency symbol 
QDATFMT MDY Date format 
QDATSEP ‘’ Date separator 
QDECFMT b’ Decimal format 
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Type 
Character 
Character 


Character 


Character 


Decimal 

Character 
Character 
Character 


Character 


Type 

Character 
Character 
Character 


Character 


2 or 3! 


(5 0) 

6, 7, 8, or 92 
2 

2 

2 


Length 


System Control System Values 


Name 


QABNORMSW 


QAUTOCFG 
QCHRID 
QCMNRCYLMT 
QCONSOLE 


QCTLSBSD 
QDBRCVYWT 


QDEVNAMING 


QIGC 


QIPLDATTIM 


QIPLSTS 


QIPLTYPE 


QKBDTYPE 
QMAXSIGN 


QPFRADJ 


Initial 
Value 
0’ 


A 


101 37’ 


‘0 0’ 


‘DSPO1’ 


‘QBASE QGPL’ 


‘0’ 


NORMAL’ 


‘*NONE’ 


Description 


Previous end of system indicators. (‘0’ 
means previous end was normal. ‘1’ 
means previous end was abnormal.) 
Cannot be changed. 

Autoconfiguration indicator. (‘0’ 
means autoconfiguration is off. ‘1’ 
means autoconfiguration is on.) 
Default graphic character set and code 
page used for displaying or printing 
data. 

Provides recovery limits for system 
communications recovery. 

Console name. Cannot be changed. 
Controlling subsystem name. 

Data base recovery indicator. 

(‘0’ means wait. ‘1’ means do not 
wait.) 

Indicates the device naming convention. 
(‘*NORMAL’ means follow AS/400 
standards. ’*S36’ means follow 
System/36 standards.) 

Indicates if the DBCS version of the 
system is installed. (‘1’ means the DBCS 
version is installed. ‘0’ means the DBCS 
version is not installed.) Cannot be 
changed. 

Date and time to automatically IPL the 
system. 

IPL status indicator. (‘0’ specifies oper- 
ator panel IPL. ‘1’ specifies auto-IPL 
after power is restored. °2’ specifies 
Start IPL again. “3’ specifies auto-IPL at 
some TIME OF DAY. ’4’ specifies remote 
IPL.) Cannot be changed. 

Indicates type of IPL to perform. (’0’ 
means unattended IPL. ‘1’ means 
attended IPL with service screens.) 
Specifies a language character set for 
the keyboard. 

Maximum number of invalid sign-on 
attempts allowed. 

Performance adjustment. (’0’ means no 
performance adjustment. ‘1’ means 
performance adjustment at IPL.) 


Type 


Character 


Character 
Character 
Character 
Character 


Character 
Character 


Character 


Character 


Character 


Character 


Character 


Character 
Character 


Character 


Length 


20 


10 


20 
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Name 


QPRTDEV 
QPWRDWNLMT 


QPWRRSTIPL 


QRMTIPL 


QSCPFCONS 


QSECURITY 


QSPCENV 


QSRLNBR 


QSTRPRTWTR 


QSTRUPPGM 


QUPSDLYTIM 


QUPSMSGQ 


Initial 
Value 


"PRTOI’ 
‘300’ 


‘0’ 


‘10’ 


‘*NONE’ 


‘QSTRUP 
QSYS’ 


‘*CALC’ 


‘QSYSOPR 


QSYS’ 
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Description 


Default printer device description. 
Maximum amount of time (in seconds) 
allowed for PWRDWNSYS *IMMED. 
Automatic IPL after power restored 
allowed. (’0’ means no auto-IPL after 
power restored. ‘1’ means auto-IPL 
after power restored.) 

Remote power on and IPL indicator. 
(‘0’ means remote power on and IPL is 
not allowed. ‘1’ means remote power 
on and IPL is allowed.) 

IPL console indicator. (‘1’ means to 
switch to unattended IPL if console 
problems occur during IPL. ‘0’ means 
end system.) 

Indicates security level. (’10’ means 
physical security only. ‘20’ means pass- 
word security only. ’30’ means pass- 
word security and resource security.) 
Indicates default special environment. 


(‘*NONE’ means no special environment. 


‘*§36’ means System/36 environment.) 
System serial number. Cannot be 
changed. 

Indicates if print writers should be 
started. (‘0’ means print writers not 
started. ‘1’ means start print writers.) 
Cannot be changed. 

Startup program name called from 
autostart job in the controlling sub- 
system. 

Uninterruptible power supply delay 
time. 

Message queue for uninterruptible 
power supply messages. 


Type 


Character 
Decimal 


Character 


Character 


Character 


Character 


Character 


Character 


Character 


Character 


Character 


Character 


Length 


10 
(5 0) 


1 


10 


20 


20 


Library List System Values 


Initial 

Name Value Description 

QSYSLIBL ‘QSYS System part of the library list. 
QHLPSYS 
QUSRSYS’ 

QUSRLIBL ‘QGPL User part of the library list. 
QTEMP’ 


Allocation System Values 


Initial 
Name Value Description 
QACTIJOB 20 Initial number of active jobs to allocate storage 
for. 
QADLACTJ 10 Additional number of active jobs to allocate 


storage for. 


QADLSPLA 2048 Additional storage for extending spooling control 
block (bytes). 


QADLTOTJ 10 Additional total number of jobs to allocate storage 
for. 

QJOBMSGQSZ 16 The size used to create job message queues 
(K_ bytes). 

QJOBMSGQTL 24 Maximum reinitialization size of job message 
queue (K bytes). 

QJOBSPLA 1536 Initial size of spooling control block for a job 
(bytes). 

QTOTJOB 30 [nitial total number of jobs to allocate storage for. 


Message and Logging System Values 


Initial 
Name Value Description 
QACGLVL *NONE Accounting level. 
QPRTTXT blanks Up to 30 characters of text that can be 


printed at the bottom of the form. 
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Type 


Character 


Character 


Type 


Decimal 


Decimal 


Decimal 


Decimal 


Decimal 


Decimal 


Decimal 


Decimal 


Type 
Character 


Character 


Length 
150 


250 


Length 
(5 0) 


(5 0) 


(5 0) 


(5 0) 


(5 9) 


(5 0) 


(5 0) 


(5 0) 


Length 
80 
30 
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Initial 


Name Value Description 

QHSTLOGSIZ 5000 Maximum number of records for each 
version of the history log. 

QSRVDMP *DMPUSRJOB Control for requesting dumps: no jobs, 


system jobs, user jobs, or all jobs. 


Storage System Values 


Initial 
Name Value Description 
QBASACTLVL 6 Activity level of base storage pool. 
QBASPOOL 500 Minimum size of base storage pool (K bytes). 
QMAXACTLVL 100 Maximum activity level of the system. 


QMCHPOOL 1500 Machine storage pool size (K bytes). 


Displaying a System Value 


You use the Display System Value (DSPSYSVAL) command to display a system value. 


Type 


Decimal 


Character 


Type 
Decimal 
Zoned 
Decimal 


Zoned 


Length 
(5 0) 


10 


Length 
(5 0) 
(10 0) 
(5 0) 
(10 0) 


The DSPSYSVAL command description in the CL Reference contains a detailed 


description of the system value display. 
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C Changing a System Value 


Not all system value changes are used by the system immediately when the Change 
System Value (CHGSYSVAL) command Is issued. For some values, such as QCTLSBSD, 
the change takes effect the next time the system is IPLed. 


The following CHGSYSVAL command changes the value of the system value 
QUSRLIBL: 


CHGSYSVAL SYSVAL(QUSRLIBL) VALUE('DSTPRODLB QGPL QTEMP') 


This system value defines the system default for the user part of the initial library 
list. The initial library list for new jobs is redefined and DSTPRODLB is placed before 
QGPL and QTEMP. The change takes effect immediately for jobs started after the 
CHGSYSVAL command is run (but not for jobs that are already active). 


How the value is entered on the VALUE parameter is dependent on the type of 
( system value: character or numeric. The following rules for specifying the VALUE 
parameter apply to system values. 


e Ifa character string contains other than alphameric characters, a period, or a 
comma, it must be enclosed in apostrophes. 

e Ifa list of values is specified as the new value, the list must be enclosed in apos- 
trophes and separated by blanks. 

e Ifa numeric value or special character is specified for a character type system 
value, it must be enclosed in apostrophes. 

e Date and time values must be enclosed in apostrophes and cannot contain sepa- 


rators. 
e All qualified names in system values should be specified as ‘obj-name lib-name’. 


All numeric type system values must be specified as whole numbers greater than or 
equal to 0 and not exceeding 32 767. If a numeric system value is specified by using 
a CL variable, the variable must be decimal. A numeric value is not enclosed in 
apostrophes unless it is specified for a character type system value. Each system 
value has its own set of limitations on values. If a CL variable is used to specify the 
value for a character type system value, the CL variable must be character type and 
C may be of any length. Values are padded with blanks or truncated, as necessary. 
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Detailed Description of System Values 


System values are provided by IBM. You cannot create them. The following is a list 
of the IBM-supplied system values. 


Date and Time System Values 
Date and time system values must always be enclosed in apostrophes. 


If you change a system value during any operation that measures the length of time, 
a negative value may be set if the end time is less than the start time. 


QDATE: System date. Its value can be set from the IPL options display and is 
updated when the system value QTIME reaches midnight (000000). QDATE is a 
6-character value (5 characters for Julian) composed of the following values (each of 
which can be individually referred to). The format of the date is as specified in the 
system value QDATFMT. A change made to this value takes effect immediately. 


© QYEAR. Year. Its value can range from 0 through 99. When you specify the 
date in CL commands, you can specify only 2 digits for the year in the date 
format. The system assigns the first 2 digits for the year (xx) based on the fol- 
lowing rules: 


— If YY is equal to or greater than 40, the system assigns a value of 19 (19xx). 
— If vy is less than 40, the system assigns a value of 20 (20xx). 


You should, however, be careful when specifying the date on the PERIOD param- 
eter; an incorrect date will cause the command to fail. For example, if you 
specify PERIOD(090929 *CURRENT) on the Display Log (DSPLOG) command, the 
command fails because the system interprets the value 29 (specified for the year) 
as 2029 instead of 1929. Because 2029 is later than the current date (19xx), the 
value is rejected, and the command fails. 


¢ QMONTH. Month of the year. Its value can range from 1 through 12. (Not 
valid for Julian.) 


¢ QDAY. Day of the month. Its value must be a valid day of the specified month 
and year. For Julian dates only, QDAY is a 3-character value (001 through 366 
for Julian). 


¢ QLEAPADJ. Leap year adjustment. This system value is used to adjust the 
system calendar algorithm for the leap year in different calendar systems. If 
your calendar year agrees with what is used in the Gregorian calendar system, 
then this system value should be zero. If your calendar year differs from the 
Gregorian, you may need to adjust the system calendar algorithm to account for 
the leap year of that calendar year you are using. To make the adjustment, 
divide the leap year in your calendar system by 4; then set QLEAPADJ to the 
value of the remainder. 


Example: The Gregorian calendar year of 1984 is the year 73 in the Republic of 
China calendar. Because 73 is a leap year for the Republic of China, you need 
to divide 73 by 4; this leaves a remainder of 1. Therefore, to adjust the system 
calendar algorithm for the Republic of China, specify a 1 for the QLEAPADJ 
system value. 


Changing the QLEAPADJ system value does not change the system clock and job 
dates of active jobs, but it may change the QDATE system value. 
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QTIME: Time of day. Its value can be set from the IPL options display. QTIME is a 
6- to 9-character value depending on the resolution required. A length of 6 charac- 
ters provides 2 characters each for hours, minutes, and seconds. As the length 
increases, the time resolution becomes more precise (tenths of a second in position 7, 
hundredths of a second in position 8, and thousandths of a second in position 9). A 
change made to this value takes effect immediately. 


° QHOUR. Hour of the day. Its value can range from 00 through 23. 
° QMINUTE. Minute of the hour. Its value can range from 00 through 59. 
¢ QSECOND. Second of the minute. Its value can range from 00 through 59. 


The Retrieve System Value (RTVSYSVAL) command allows the CL variable to be 
greater than or equal to 6 characters. If the CL variable is larger than 9 characters, 
then the first 9 characters contains hours, minutes, seconds, and milliseconds and the 
others are padded with blanks. The Change System Value (CHGSYSVAL) command 
can be used to set milliseconds to zero on a change to QTIME, QHOUR, QMINUTE, or 
QSECOND. Milliseconds cannot be specified on any system value change. The 
Display System Value (DSPSYSVAL) does not display milliseconds. 


The following table shows the various values provided by the CL character variable. 


Length of 
CL Character 
Variable Meaning 
<6 Invalid. 
6 Hours, minutes, and seconds. 
7 Hours, minutes, seconds, and tenths of a second. 
8 Hours, minutes, seconds, tenths of a second, and hun- 
dredths of a second. 
9 Hours, minutes, seconds, tenths of a second, hun- 
dredths of a second, and thousandths of a second. 
>9 Hours, minutes, seconds, tenths of a second, hun- 


dredths of a second, thousandths of a second, and 
padded with blanks. 
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Editing System Values 
QCURSYM: Currency symbol. This system value is used to validate the currency 
symbols specified in the DDS keywords EDTWRD and EDTCDE. QCURSYM is a 
1-character value and can be any character except blank, -, &, *, or 0. 


QDATFMT: System date format. This system value is 3 characters that can be YMD, 
MDY, DMY, or JUL (Julian format). (Y = year; M = month; D = day.) This 
system value is used for the following: 

e The default value for the DATFMT job attribute 


¢ To determine the format in which a date can be specified on the IPL options 
prompt 


For more information on DATFMT, see the RTVJOBA and CHGJOB commands in the 
CL Reference. 


QDATSEP: Character separator for dates. This system value is used as the date 
separator for the following: 
e The default value for the DATSEP job attribute 


e In the date that can be specified on the IPL options prompt 
QDATSEP is a 1-character value and can be /, -, period (.), or comma (,). 


The RTVJOBA and CHGJOB commands in the CL Reference contain more information 
on DATSEP. 


QDECFMT: Decimal format. This is a 1-character system value used for the fol- 
lowing: 


¢ To determine the type of zero suppression and decimal point character used by 
DDS edit codes 1 through 4 and A through M 
¢ To determine the decimal point character for decimal input fields on displays 


QDECFMT must be one of the following characters: 


e b: Use a period for a decimal point, use a comma for a three-digit grouping 
character, and zero-suppress to the left of the decimal point. 


e J: Use a comma for a decimal point, and use a period for a three-digit grouping 
character. The zero-suppression character is in the second position (rather than 
the first) to the left of the decimal notation. Thus balances with zero values to 
the left of the comma are written with one leading zero (0,04). The J entry also 
overrides any edit codes that might suppress the leading zero. 


e J: Use a comma for a decimal point, use a period for a three-digit grouping 
character, and zero-suppress to the left of the decimal point. 
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System Control System Values 
QABNORMSW: Previous end of system indicator. Specifies if the previous end of 
system was normal or abnormal. The previous end was normal if it is the result of a 
successful PWRDWNSYS command and the ENDJOBABN was not used. If you end a 
job using the ENDJOBABN command, the next system end will be abnormal. You 
cannot change QABNORMS\W;; it is set by the system. QABNORMSwW is a l1-character 
value that can be ’0’ (normal) or ‘1’ (abnormal). You can refer to this value in user- 
written recovery programs. 


QAUTOCFG: Autoconfiguration indicator. Specifies if devices that are dynamically 
added to the system should be configured automatically. 


e ‘0’: Autoconfiguration is off. You will have to manually configure any new 
local controllers or devices that you add to your system. 


e ‘|’: Autoconfiguration is on. The system will automatically configure any new 
local controllers or devices that are added to your system. The operator will 
receive a message indicating the changes to the system’s configuration. 


QCHRID: Default character set and code page. This system value specifies the char- 
acter set and code page to be used when CHRID(*SYSVAL) is specified for the CL com- 
mands that create, change, or override display files, display device descriptions, and 
printer files. In general, the value you specify should be one of the values shown for 
the CHRID parameter on the CRTDSPF, CRTDEVD, or CRTPRTF command in the CL 
Reference. Specify a value that reflects the language used at most of the devices 
attached to your system. The Data Management Guide contains more information in 
the sections on using alternative graphic character sets and code pages. 


QCHRID is a single 20-character value with two parts: 


e Character set identifier: This part identifies the character set to use. This identi- 
fier must be in the range of 1 through 32 767. 


e Code page identifier: This part identifies the code page to use. This identifier 
must be in the range of 1 through 32 767. 


The QCHRID system value is retrieved as a single character value; the first 10 charac- 
ters contain the character set identifier right-adjusted. For example, the value 101 
would be retrieved as ‘0000000101’. The last 10 characters contain the code page 
identifier right-adjusted. For example, the value 37 would be retrieved as 
‘0000000037’. The QCHRID system value is displayed in the same format as other list 
type system values. 
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QCMNRCYLMT: Communications recovery limits. The value of QCMNRCYLMT is a 
20-character list containing two values: 


¢ Count limit: The number of recovery attempts (0-99) to be made by the system 
before an inquiry message is sent to the system operator. 


e¢ Time interval: The time period (0-120 minutes) before the system will send an 
inquiry message to the system operator if the count limit is reached. 


Both values are integer values and must be specified in a quoted string. A blank 
must separate the count limit from the time interval. The possible recovery actions 
are: 


Count Limit Time Interval Action 

0 0 No recovery 

0 1 through 120 No recovery 

1 through 99 0 Infinite recovery 


1 through 99 1 through 120 Count and time recovery 


If your AS/400 system is attached to a ROLM CBX, the recovery attempts value 
should never be 0. Recovery attempts are necessary for the AS/400 system to estab- 
lish a connection using the ROLM CBx’s inbound modem pool. 


A change to the QCMNRCYLMT system value does not affect a varied on device, but 
is in effect when a device is varied on. The Communications Programmer’s Guide. 
contains more information on communications recovery. 


The QCMNRCYLMT system value is retrieved as a 20-character value: the first 20 
characters contain the count limit right adjusted, for example, the value 7 would be 
retrieved as ‘0000000007’. The last 10 characters contain the time interval right 
adjusted, for example, the value 117 would be retrieved as ‘0000000117’. The 
QCMNRCYLMT is displayed in the same format as other list type system values. 


QCONSOLE: Console name. Specifies the name of the display device that is the 
console. You cannot change this system value. 


QCTLSBSD: Controlling subsystem. The value of QCTLSBSD is a 20-character list of 
up to two 10-character values in which the first is the subsystem description name 
and the second is the library name. The list must be specified as a quoted string 
separating the subsystem description name and the library name by a blank if the 
library is specified (for example, ‘QSBSD QLIB’). Apostrophes are necessary only 
when the library name or *LIBL is specified with the subsystem name. If the library 
name is not specified or *LIBL is specified for the library, the library list is used to 
locate the subsystem description, and the library where the subsystem description is 
found is stored in the system value. If *LIBL is specified for the library name for a 
change made from selecting ‘Define or Change System at IPL Menu’ on the IPL 
options display, during IPL, QGPL is the only library in the library list (*LIBL). 


A change to this value takes effect at the next IPL unless the change is made on the 
IBM-supplied configuration menu during IPL, in which case a change to this value 
takes effect immediately. If this subsystem description cannot be used (for example, 
it is damaged), the backup subsystem description QSYSSBSD in the library QSYS can 
be used. A subsystem description specified as the controlling subsystem cannot be 
deleted or renamed once the system is fully operational. Refer to “Creating Another 
Controlling Subsystem” on page 2-47 in Chapter 2, “Using Work Management 
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Functions” on page 2-1 for other items to consider before changing the value of 
QCTLSBSD. 


The subsystem you will be signed on to is displayed in the upper nght corner of the 
sign-on prompt. During an IPL, if the QCTLSBSD system value is changed by selecting 
‘Define or Change System’ on the IPL options display, the user will be signed on a 
different subsystem than the one that was displayed on the Sign-On display. This is 
because the change takes effect immediately. 


QDBRCVYWT: Data base recovery wait indicator. Indicates when recovery of files 
created with the RECOVER(*AFTIPL) option is performed during an unattended IPL. 
QDBRCVYWT is a 1-character value that can be: 


e ‘0’: Do not wait for data base recovery to complete. 
e ‘1’: Wait for data base recovery to complete before completing the IPL. 


If QDBRCVYWT is ‘1’, then, during an unattended IPL, files which were created with 
the RECOVER(*AFTIPL) option will be treated as if they had been created with the 
RECOVER(*IPL) option. This value does not affect recovery of files that are created 
with RECOVER(*IPL) or RECOVER(*NO). A change to this value takes effect during the 
next IPL in unattended mode. QDBRCVYWT has no effect during an attended IPL. 
This value is related to the RECOVER parameter on the Create Physical File (CRTPF) 
and Create Logical File (CRTLF) commands. 


QDEVNAMING: Device naming convention. Specifies what naming convention is 
used when the system automatically creates device descriptions. You can change, 
display, and retrieve this value. QDEVNAMING is a 10-character value that can be: 


e ’*NORMAL’: Naming conventions should follow AS/400 standards. 


e ‘$36’: Naming conventions should follow System/36 standards. 


The following shows an example of the normal naming convention and the $36 
naming convention: 


Device Normal S36 
Display Stations DSP01, DSP02 Wi, W2 
Diskette Drive DKTOl1 Il 


For more information on the device naming conventions, see the Device Configura- 
tion Guide. 


QIGC: DBCS character indicator. Specifies if the DBCS version of the system is 
installed. You cannot change QIGC; it is set by the system. You can refer to this 
system value in an application program. QIGC is a l-character value that can be: 


e ‘0’: The DBCS version is not installed. 
e ‘1’: The DBCS version is installed. 


QIPLDATTIM: Date and time to automatically IPL the system. Specifies a date and 
time when an automatic IPL should occur. The default value *NONE indicates that 
no timed automatic IPL is desired. QIPLDATTIM is a 20-character list of two 
10-character values. The first value is the date when the timed IPL should occur. 
The date is in QDATFMT format with no date separators. The date cannot be more 
than 11 months after the current date. The second value is the time. The seconds 
portion of the time value must be specified, but is ignored. If the date and time has 
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already occurred when the system is powered down or the system is running when 
the date and time occur, no IPL is performed. The value of QIPLDATTIM does not go 
back to *NONE after the IPL occurs or the date and time passes, but remains until it 
is changed. The following example shows how to change the IPL date and time to 
September 10, 1987, at 9:00 a.m. (QDATFMT is MDY). 


CHGSYSVAL SYSVAL(QIPLDATTIM) VALUE('091087 090000') 


QIPLSTS: IPL status indicator. Indicates what form of IPL has occurred. There is 
an indicator value for each form of IPL. You can refer to this value in your recovery 
programs, but you cannot change it. 


e ‘0’: Operator panel IPL. IPL occurred when requested from the operator panel. 


e ‘1’: Auto-IPL after power restored. IPL occurred automatically when power was 
restored after a power failure. This is enabled by the QPWRRSTIPL system value. 


e ‘2’: Restart IPL. IPL occurred when the Power Down System (PWRDWNSYS) 
command with RESTART(*YES) was issued. 


e ‘3’: Time-of-day IPL. IPL occurred automatically on the date and time set on 
the QIPLDATTIM system value. 


e ‘4’: Remote IPL. Remote IPL occurred. This is enabled by the QRMTIPL system 
value. 


QIPLTYPE: Indicates type of IPL to perform. Specifies the type of IPL performed 
when the system is powered on manually with the key in the normal position. 
QIPLTYPE is a l-character value that can be: 


e ’0’: Unattended. No screens are shown during IPL. The normal sign-on screen 
is shown when the IPL is complete. 


e ‘1’: Attended with dedicated service tools. All dedicated service tools functions 
are available along with the full set of IPL screens. 


QKBDTYPE: Specifies the language character set for the keyboard. Based on the 
language value specified at install time, OS/400 will put the appropriate keyboard 
value into the this system value. QKBDTYPE is a 3-character value that can be as 
follows: 


QKBDTYPE Language/Country 


Value 

AGB Austria/Germany 

AGI Austria/Germany Multinational 
BLB Belgium 

BLI Belgium Multinational 

CAB Canadian French 

CAI Canadian French Multinational 
CLB Arabic X/Basic 

CYB Cyrillic 

DMB Denmark 

DMI Denmark Multinational 

FNB Finland/Sweden 

FNI Finland/Sweden Multinational 
FAB France (Azerty) 

FAI France (Azerty) Multinational 
FQB France (Qwerty) 

FQI France (Qwerty) Multinational 
GKB Greece 
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ICB 
ICI 
INB 
INI 
ITB 
ITI 
JEB 
JEI 
JKB 
KAB 
KOB 
NCB 
NEB 
NEI 
NWB 
NWI 
PRB 
PRI 
RCB 
ROB 
SPB 
SPI 
SSB 
SSI 
SWB 
SWI 
SFB 
SFI 
SGB 
SGI 
TAB 
THB 
TKB 
UKB 
UKI 
USB 
USI 
YGI 


Iceland 

Iceland Multinational 
International 

International Multinational 
Italy 

Italy Multinational 

Japan (English) 

Japan (English) Multinational 
Japan (Kanji) 

Japan (Katakana) 

Korea 

Hebrew 

Netherlands 

Netherlands Multinational 
Norway 

Norway Multinational 

Portugal 

Portugal Multinational 
Simplified Chinese 

Latin 2 

Spain 

Spain Multinational 

Spanish Speaking 

Spanish Speaking Multinational 
Sweden 

Sweden Multinational 
Switzerland/French 
Switzerland/French Multinational 
Switzerland/German 
Switzerland/German Multinational 
Traditional Chinese 

Thailand 

Turkey 

United Kingdom 

United Kingdom Multinational 
United States/Canada 

United States/Canada Multinational 
Yugoslavia Multinational 


QMAXSIGN: Maximum number of invalid sign-on attempts allowed. Invalid sign-on 
attempts arise from any of the following circumstances: 


¢ Invalid user name (if secured system). 

e Invalid password (if secured system). 

e The user profile does not have authority to the device from which the user name 
was entered (if secured system). 


Note: 


A sign-on attempt will not be counted as an invalid attempt if passwords are 
required and the user profile has a password of *NONE specified. The user 
will receive a message saying that no password is associated with the user 
profile. It also will not be counted as an invalid attempt if (1) the program or 
menu are not valid names, (2) if the user name is not a valid name on a non- 
secured system, or (3) if the current library specified is not found. 


If the QMAXSIGN value maximum is reached, the work station device is varied off 
and a message is sent to the QSYSMSG message queue if it exists; otherwise, it is sent 
to QSYSOPR. The device must be varied on again before a user can sign on. If the 
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controlling subsystem is in the restricted state (so that only one device in it can be 
used) and the maximum is reached, the system is ended and control panel lights on 
the control panel turn on to indicate that you must perform an IPL. QMAXSIGN is 
character. The lower limit for QMAXSIGN is 1. The initial value is ‘15’. To change 
the QMAXSIGN system value, the user must have security officer (QSECOFR) authority, 
which can be from a user profile or a group profile or it can be adopted by a 
program. 


When the number of invalid sign-on attempts is one less than QMAXSIGN, message 
CPF1116 is sent to the display to warn the user that if another invalid attempt is made 
the device will become unusable. In some environments, it is not desirable to have 
this message appear. You cannot prevent this message from being sent, but you can 
change the message text (by using the CHGMSGD command) to the same text as 
CPF1107 Password not valid for system. Refer to CPF1107 for the values entered for the 
MSG and SECLVL parameters. 


QPFRADJ: Performance adjustment. Indicates whether the system should adjust 
values for system pool sizes and activity levels as follows: 


e ‘0’: No performance adjustment. The existing values for system pool sizes and 
activity levels are used. 


e ‘1’: Performance adjustment at IPL. The values for system pool sizes and 
activity levels are calculated and changed during IPL. The following values are 
changed: 


— QMCHPOOL system value 

— QBASACTLVL system value (if QGPL/QBASE or QGPL/QCTL is the controlling 
subsystem) 

— Pool 2 of QGPL/QSPL subsystem description 

— Pool 2 of QGPL/QBASE subsystem description (if QGPL/QBASE is controlling 
subsystem) 

— Pool 2 of QGPL/QINTER subsystem description (if QGPL/QCTL 1s controlling 
subsystem) 


The value of QPFRADJ should be set to ’0’ if you have set any of these values. 


The performance adjustment is only done once during IPL; it does not dynamically 
change with the configuration or workload. After your configuration has stabilized, 
QPFRADJ can be changed to ’0’ to save time during IPL. Be sure to do at least one 
IPL after your configuration is set. 


QPRTDEV: Default printer device description. Specifies the default printer for the 
system. This value will take effect when a spooled file is opened. If the specified 
device description exists, it must be a printer device description. The initial value is 
PRTO1. 
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QPWRDWNLMT: Maximum amount of time an immediate power down can take 
before processing is ended (abnormal end). This is the time used to wait for power 
down to complete normally after either of the following happens: 


e A Power Down System (PWRDWNSYS) command with an OPTION(*IMMED) 
parameter is entered. 


¢ A PWRDWNSYS command with an OPTION(*CNTRLD) parameter was entered and 
the time specified on the DELAY parameter has ended. 


The QPWRDWNIMT value is ignored when either of these commands is entered after 
a power failure has occurred on a system with the power warning feature installed 
(see the Backup and Recovery Guide for more details). 


A change to this value takes effect when a PWRDWNSYS command is entered. 
QPWRDWNILMT is numeric. The lower limit for QEeWRDWNLMT is 0. If the value is 
set to 0 and a PWRDWNSYS command with OPTION(*IMMED) Is entered, processing is 
ended immediately (abnormal end). 


QPWRRSTIPL: Automatic IPL is allowed after power restored. Specifies if the 
system should automatically IPL when utility power is restored after a power failure. 
QPWRRSTIPL is a l-character value that can be: 


e ’0’: Auto-IPL is not enabled. 
e ‘1’: Auto-IPL is enabled. 


QRMTIPL: Remote IPL indicator. Specifies if remote power on and IPL can be 
started over a phone line. QRMTIPL is a 1-character value that can be: 


e ’0’: Remote IPL is not enabled. 
e ‘1’: Remote IPL is enabled. 


QSCPFCONS: ScPF console indicator. Indicates if the IPL is to continue unattended 
or to end when the console is not operational when trying an attended IPL. 
QSCPFCONS must have been set before the current IPL. QSCPFCONS is a 1-character 
value that can be ’0’ (end) or ‘1’ (continue unattended). It should be ’0’ if there are 
no work stations other than the console on the system or if the controlling subsystem 
supports only the console and does not start other subsystems that support other 
work stations. 


QSECURITY: Security indicator. Specifies the level of security on the system. To 
change this system value, the user must have security officer (QSECOFR) authority, 
which can be from a user profile or a group profile or it can be adopted by a 
program. The QSECURITY system value can be changed at any time using the 
CHGSYSVAL command, but the change to the security level does not take effect until 
the next IPL as follows: 


Attended IPL: The security level required to sign on for the IPL will stay the same as 


what was in effect before a system IPL was performed. Changes will be made during 
the IPL but after the sign-on for the IPL. 
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Note: During an attended IPL, you can also change the QSECURITY system value by 
selecting “Define or Change System” on the IPL options display and the 
change will take effect when the IPL is done. This change would override any 
change that was requested before the IPL. 


Unattended IPL: Previously requested changes to the security level will be made 
during the IPL. 


QSECURITY is a 2-character value that can be: 


e ‘10’: The system does not require a password at sign-on. The user has access to 
all system resources. Special authorities can be added or removed from a user 
profile using the CRTUSRPRF or CHGUSRPRF command. 


e ‘20’: The system will require a password at sign-on. The user has access to all 
system resources. 


e ’30’: The system will require a password at sign-on. The user must have 
authority to access all system resources. 


All user profiles will have special authorities granted or revoked based on their 
user class when changing from a level 10 or 20 system. 


QSPCENV: Special environment indicator. Specifies the system environment used as 
the default for all user profiles. This value will not be saved in the user profile. It 
will be checked at sign-on time. QSPCENV is a 10-character value that can be: 


¢ ’*NONE’: You will enter the AS/400 system environment at job start time. 
e ’*§36’: You will enter the System/36 environment at job start time. 


QSRLNBR: System serial number. You cannot change QSRLNBR; it is retrieved from 
the machine configuration record by the system when installing OS/400. You can 
display QSRLNBR, or you can retrieve this value in user-written programs. QSRLNBR 
is an 8-character value. 


Note: The system serial number is also used to set the system name. There is a 
discussion of the Change Network Attributes (CHGNETA) command in the 
Communications Programmer’s Guide. 


QSTRUPPGM: Start-up program name called from autostart job in the controlling 
subsystem. This program performs setup functions such as starting subsystems and 
printers. This system value can only be changed by the security officer or a profile 
with security officer authority. QSTRUPPGM is a 20-character value that can be: 


¢ ‘QSTRUP QSsys’: The program specified will be run as a result of a transfer 
control to it from the autostart job in the controlling subsystem. 
¢ ’*NONE’: The autostart job will end normally without calling a program. 


The QSTRUP IBM-supplied program does the following: 


e Starts the QSPL subsystem for spool work. 

e Releases the QS36MRT and QS36EVOKE job queues if they were held (these are 
used by the System/36 environment). 

e Starts all print writers unless user said not to on the IPL Options display. 

e If the controlling subsystem is QCTL, it starts the QINTER, QBATCH, and QCMN 
subsystems. 
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QSTRPRTWTR: Indicates if print writers are started. This system value is either set 
by the system at IPL time or by the user on the IPL Options display. This value can 
only be displayed or retrieved. The IBM-supplied startup program QSTRUP uses this 
system value to determine whether to start print writers. QSTRPRTWTR is a 
1-character value that can be: 


e ‘0’: Do not start print writers. 
e ‘1’: Start print writers. 


QUPSDLYTIM: Uninterruptible power supply (UPS) delay time. The QUPSDLYTIM 
system value indicates the amount of time that should elapse before the system auto- 
matically powers down, following a power failure. This system value is only mean- 
ingful if your system has the battery power unit or has an uninterruptible power 
supply (UPS) attached. The allowed values are: 


Value Description 

*=CALC The appropriate wait time (in seconds) will be calculated. (This 
should only be used if you have the battery power unit.) 
Notes: 


1. The calculated value is only appropriate for the 9404 user 
(although there is no restriction on its use by a 9406 user). 

2. The calculated value is based on the amount of devices and 
the number of changed pages in main storage. 

3. The calculated value may have to be adjusted by the user if 
there has been a series of power outages, or if the batteries 
are not fully charged. 


‘*NOMAX’ The system will not start any action on its own. 
‘0’ Automatic system power down when system utility power fails. 
“1’-"99999" Delay time specified in seconds before the system powers down. 
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The initial value is *CALC. A change to this value takes effect immediately. For 
more information on the uninterruptible power supply feature, see the Backup and 
Recovery Guide. 


The QUPSDLYTIM system value is in the form of a two-item list. The first item is the 
value the user specified on the CHGSYSVAL command. The second item is the delay 
time, which is either what the user specified or, if *CALC was specified, is the calcu- 
lated delay time. 


You specify only the first item in the list. The second item, if specified, will be 
ignored. If you want to retrieve the QUPSDLYTIM system value, you would retrieve it 
into a CHAR 20 variable. The first 10 characters would be what you specified. The 
second 10 characters would be the delay time value (calculated by the machine or 
specified by you) you would use in your program. 


10 Characters 10 Characters 
0000000340 0000000340 
*NOMAX *NOMAX 
*CALC 0000000120 


The following examples show what the user could enter and how the value would be 
displayed: 


Example 1 


User enters: 
CHGSYSVAL QUPSDLYTIM '340' 


Display shows: 
Value 


0000000340 
0000000340 
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Example 2 


User enters: 


CHGSYSVAL QUPSDLYTIM '*NOMAX' 
Display shows: 


Value 
*NOMAX 
*NOMAX 


Example 3 


User enters: 


CHGSYSVAL QUPSDLYTIM '*CALC' 
Display shows: 


Value 
*CALC 
0000000120 


QUPSMSGQ: Name of a message queue that is to receive uninterruptible power 
supply messages. If the message queue is not the system operator message queue 
(‘QSYSOPR QSyYSs’), then all uninterruptible power supply messages are also sent to the 
QSYSOPR message queue. This system value is meaningful only if your system has 
the battery power unit feature and has an uninterruptible power supply attached. 


When a change in power activates the uninterruptible power supply, this message 
queue receives the uninterruptible power supply activated message (CPF1816). If the 
QUPSDLYTIM is ’**NOMAX’, the following conditions must be met or the system will 
begin an immediate power down. 


e The message queue specified in the QUPSMSGQ system value must exist. 


e If the message queue is a work station message queue (or QSYSOPR), it must be 
in break or notify mode. 


e Ifthe message queue is not a work station message queue, it must be allocated 
by a job. 
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For all other uninterruptible power supply messages, the message queue does not 
have to be allocated, or in break or notify mode. If the system value QUPSMSGQ 
does not contain the name of a valid message queue, a message will be sent to 
QSYSOPR indicating the notification failure, and the system will continue processing. 


For more information on the uninterruptible power supply feature, see the Backup 
and Recovery Guide. 


Library List System Values 
QSYSLIBL: System part of library list. Its value is a 150-character list, enclosed in 
apostrophes, of library names with each name up to 10 characters in length, sepa- 
rated by blanks. The list can contain as many as 15 names. Apostrophes are neces- 
sary only when more than one library name is specified (for example, ’SYSLIB1 
SYSLIB2’). The libraries in the system part are searched for an object before any 
libraries in the user part. A change to this value takes effect immediately (when the 
next job starts). A library specified as part of the library list cannot be deleted or 
renamed once the system is fully operational. To change the QSYSLIBL system value, 
you must have security officer (QSECOFR) authority, which can be from a user 
profile, a group profile, or it can be adopted by a program. 


QUSRLIBL: Default for user part of library list. Its value is a 250-character list, 
enclosed within apostrophes, of library names with each name up to 10 characters in 
length, separated by blanks. The list can contain as many as 25 names. Apostro- 
phes are necessary only when more than one library name is specified. For example, 
‘USERLIB1 USERLIB2’. The libraries in this part are searched for an object after the 
libraries in the system part and also after the product library and current library 
entries. However, if the user part of the library list is specified for a job through a 
Change Library List (CHGLIBL) command or the job description, or is changed 
through the Add Library List Entry (ADDLIBLE) or Remove Library List Entry 
(RMVLIBLE) commands, QUSRLIBL is no longer used for that job. A change to this 
value takes effect immediately (when the next job starts). A library specified as part 
of the library list cannot be deleted or renamed once the system is fully operational. 


Allocation System Values 
QACTJOB: Initial number of active jobs for which auxiliary storage is to be allo- 
cated during IPL. An active job is a job that has started running but not ended. The 
amount of auxiliary storage allocated for each active job is approximately 110K. 
This storage is in addition to the storage allocated using the system value QTOTJOB. 
QACTJOB is numeric. The lower limit for QACTJOB is 1. A change to this value takes 
effect at the next IPL unless the change is made on the IBM-supplied configuration 
menu, in which case it is used for the current IPL. QACTJOB may be changed to a 
smaller value during IPL if the combination of allocation system values requires more 
auxiliary storage than is available to start the system. If this happens, you will be 
notified. 


A reasonable value to assign to QACTJOB is your estimate of the number of active 
jobs on a typically heavy use day. This can be done by viewing the active jobs field 
on the active jobs display (WRKACTJOB command). Both user and system jobs are 
included in the count on this display and should be considered when assigning a 
value to QACTJOB. 
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QADLACTUJ: Additional number of active jobs for which auxiliary storage is to be 
allocated when the initial number of active jobs (the system value QACTJOB) 1s 
reached. This auxiliary storage is allocated whenever the number of active jobs 
exceeds that for which storage has already been allocated. The amount of storage 
allocated for each job is approximately 110K. QADLACTJ is numeric. The lower 
limit for QADLACTJ is 1. A change to this value takes effect immediately. QADLACTJ 
may be changed to a smaller value during IPL if the combination of allocation 
system values requires more auxiliary storage than is available to start the system. If 
this happens, you will be notified. 


An initial value of 10 is reasonable to assign to QADLACTJ. The number should not 
usually be set too close to 1, because this causes frequent interruption on a day when 
many additional jobs are needed. The number should not usually be set too high 
because the time required to add additional storage should be minimized. 


QADLSPLA: Additional storage to extend the spooling control block. This storage 
is allocated when the number of spooled files exceeds the initial storage assigned by 
the QJOBSPLA system value or the last extension from QADLSPLA. This value affects 
auxiliary storage, but also affects processing performance each time an extension is 
needed. For this reason, a relatively high default of 2048 bytes is used to allow an 
extension for approximately four or five spooled files. No additional bytes are 
added to the value you supply, but the value will be rounded up (if needed) to the 
next 512-byte page boundary. 


If you have sufficient auxiliary storage, a value of 4096 is a good choice to allow for 
approximately nine or ten spooled files per extension. The next logical choice would 
be 8192. Set the QADLSPLA value so that it rounds up (if needed) to a 2K, 4K, or 
8K value. 


QADLSPLA is numeric. The lower limit is 1024 bytes. A change to this value takes 
effect for the next time an extension is needed. 


QADLTOTJ: Additional number of jobs for which auxiliary storage is to be allocated 
when the initial number of jobs (the system value QTOTJOB) is reached. This auxil- 
lary storage is allocated whenever the number of jobs exceeds that for which storage 
has already been allocated. The amount of storage allocated for each job is approxi- 
mately the sum of the QJOBSPLA and QJOBMSGQSZ system values. 


Note: The system value QJOBSPLA is measured in bytes and the system value 
QJOBMSGQSZ is measured in K bytes. 


QADLTOTI is numeric. The lower limit for QADLTOTJ is 1. A change made to this 
value takes effect immediately. QADLTOTJ may be changed to a smaller value during 
IPL if the combination of allocation system values requires more auxiliary storage 
than is available to start the system. If this happens, you will be notified. 


An initial value of 10 is reasonable to assign to QADLTOTJ. The number should not 
usually be set too close to 1 as this will cause excessive interruption on a day when 
many additional jobs are needed. The number should not usually be set too high 
because the time required to add additional storage should be minimized. 
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QJOBMSGQSzZ: Initial size of the job message queue. To determine the approxi- 
mate size of a message queue, use 100 bytes for each message on the queue. The 
allocated space is automatically extended when the initial size is exceeded. However, 
you should try to allocate the correct amount of storage initially because it is more 
efficient than having to extend the storage. QJOBMSGQSZ is numeric and must be 
specified in K bytes. The lower limit for QJOBMSGQSZ is 1. QJOBMSGQSZ may be 
changed to a smaller value by starting OS/400 if the combination of allocation 
system values requires more auxiliary storage than is available to start the system. If 
this happens, you will be notified. 


QJOBMSGQTL: Maximum initial size of the job message queue. When a job 
message queue is reinitialized for use by another job, it is truncated to its initial size 
(the system value QJOBMSGQSZ) if it is larger than the maximum initial size 
(QJOBMSGQTL). QJOBMSGQTL is numeric and must be specified in K bytes. The 
lower limit for QJOBMSGQTL Is 1. A job message queue is extended, as needed, to 
the maximum size of a space object (16 megabytes). 


QJOBSPLA: Initial size of the spooling control block for a job. (There is one 
spooling control block for each job in the system.) The spooling control block 
records information about inline spooled files and output spooled files. This value 
primarily affects auxiliary storage requirements and has little effect on processing 
performance. The auxiliary storage is retained for every job known to the system. 


The allocated area is made up of standard control information plus a separate set of 
control information for each spooled file. The value you supply is incremented by 
approximately 200 bytes and then rounded up to the nearest 512-byte page 
boundary. The default is 1536 bytes, which rounds up to four pages (2048 bytes or 
2K) and allows for about three output spooled files per job. 


If your typical job uses more than the three output files and you are not concerned 
with an additional 2K allocation per job, a good choice would be 3600. This rounds 
up to 4096 bytes and allows for an initial allocation of approximately seven or eight 
spooled output files per job. The next largest logical choice would be 7600, which 
would round up to 8K. Set the QJOBSPLA value so that it rounds up to a 2K, 4K, or 
8K_ value. 


If the number of spooled files created by a job exceeds the initial allocation, the 
value assigned to the QADLSPLA system value is used to extend the control block. 


QJOBSPLA is numeric. The lower limit is 1024 bytes. A change to this value takes 
effect when a cold start is requested during OS/400 installation. If the system 
requires new job structures, the value is also used for the new job structures. 


QTOTJOB: Initial number of jobs for which auxiliary storage is to be allocated 
during IPL. The number of jobs is the number supported by the system at any one 
time, which includes the jobs on job queues, active jobs (including system jobs), and 
jobs having output on output queues. The amount of auxiliary storage allocated for 
each job 1s approximately the sum of the QJOBSPLA and QJOBMSGQSZ system values. 


Note: The system value QJOBSPLA is measured in bytes and the system value 
QJOBMSGQSZ is measured in K bytes. 
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QTOTJOB is numeric. The lower limit for QTOTJOB is 1. A change to this value takes 
effect at the next IPL unless the change is made on the IBM-supplied configuration 
menu, in which case, it is used for the current IPL. QTOTJOB may be changed to a 
smaller value during IPL if the combination of allocation system values requires more 
auxiliary storage than is available to start the system. If this happens, you will be 
notified. 


To find the number of total jobs in the system, view the third line of the system 
status display (using the WRKSYSSTS command). This number should usually be kept 
within reason as it is a factor in the time to perform IPL and some internal searches. 
In general, it is preferable to keep this value below 300. This may require periodic 
removal of jobs that have only job logs. The CL Programmer's Guide has a dis- 
cussion of job logs and how to remove them for jobs that complete normally. As 
long as a job has one or more spooled output files known to the system, knowledge 
of the job remains in the system and counts toward the display system status value. 
A reasonable value to assign to QTOTJOB is two to seven times the value used for 
QACTJOB, depending on how often you clear your output queues. 


Message and Logging System Values 
QACGLVL: Accounting level. Its value is a 80-character list of accounting options. 
Apostrophes are necessary only when more than one option is specified and each 
option must be separated by blanks. The possible accounting level options are: 


Accounting Option Accounting Information 

*NONE No accounting information is journaled. 

*JOB Job resource use is journaled. 

*PRINT Spooled and nonspooled print file resource use is to be jour- 
naled. 


Note: *NONE cannot be used with the other options. 


To change the QACGLVL system value, the user must have security officer (QSECOFR) 
authority, which can be from a user profile or a group profile or it can adopted by a 
program. When the QACGLVL system value is changed to options other than *NONE, 
the system accounting journal QSYS/QACGIJRN must exist; if not, the change is 
rejected. The QACGLVL system value cannot be changed on the IBM-supplied config- 
uration menu during IPL. A change to the QACGLVL system value does not affect 
jobs already on the system, but does affect new jobs that enter the system after the 
change. For more information on job accounting, see Chapter 8, “Using Job 
Accounting” on page 8-1. 


QHSTLOGSIZ: Maximum number of records for each version of the history log. 
When a version is full (the maximum has been reached), a new version is created. 
You can save the full (old) version on diskettes and then delete it. QHSTLOGSIZ is 
numeric. The lower limit for QHSTLOGSIZ is 1. (See the CL Programmer's Guide for 
more information about QHST.) 


QPRTTXT: Print text. This system value is used to print up to 30 characters of text 
on the bottom of listings and separator pages. In order for the text to be centered at 
the bottom of the listing, it must be centered in the QPRTTXT value field. The 
QPRTTXT system value will be used for system and subsystem monitor jobs and will 
be the system-wide default print text for all other jobs. If *BLANK is entered, 
QPRTTXT will be set to all blanks. The CL Reference has more information on for- 
matting print text. 
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QSRVDMP: Provides for user control over service dumps for unmonitored escape 
messages. The allowable values are: 


¢ *DMPUSRJOB: Request dumps only in user jobs, not in system jobs. (System 
jobs include the system arbiter, subsystem monitors, LU services process, spool 
readers and writers, and the SCPF job.) 

¢ *DMPSYSJOB: Request dumps only in system jobs, not user jobs. 

¢ *DMPALLJOB: Request dumps in all jobs. 

¢ *NONE: Do not request dumps in any jobs. 


Note: The ability to control the creation of service dumps with this system value 
may have an effect on IBM’s ability to respond to some system failures. The 
value *DMPALLIJOB can be used to ensure that a service dump is created when- 
ever a failing function requests one. The initial value (*DMPUSRJOB) provides 
that service dumps are created only for user jobs. 


Storage System Values 
QBASACTLVL: Maximum activity level of the base storage pool. This value indi- 
cates how many jobs (system and user jobs) can compete at the same time for 
storage in the base storage pool. QBASACTLVL depends on the types of jobs being 
run in this storage pool. A change to this value takes effect when a subsystem 
having storage pools other than the base storage pool is started, when the storage 
size or activity level of a storage pool in an active subsystem is changed, or when the 
subsystem is ended. QBASACTLVL is numeric. The lower limit for QBASACTLVL is |. 


QBASPOOL: Minimum size of the base storage pool. Storage not allocated to 
another storage pool remains in the base storage pool. A change to this value takes 
effect immediately. In some circumstances, a machine function may be using storage 
allocated to the base pool. If this is so, and if the change to this system value would 
reduce the allocation to less than 32K plus the amount needed by the machine, the 
system value is changed immediately but the actual base pool change is done by the 
OS/400 only after the storage in use is released by the machine. Use the Work with 
System Status (WRKSYSSTS) command to determine the amount of storage reserved 
for machine functions. QBASPOOL is numeric, must be specified in K bytes, and 
cannot be set to less than 32K. 


QMAXACTLVL: Maximum activity level of the system. This is the number of jobs 
that can compete at the same time for main storage and processor resources. For all 
active subsystems, the sum of all jobs running in all storage pools cannot exceed 
QMAXACTLVL. If a job cannot be processed because the activity level has been 
reached, the job is held until another job reaches a time slice or a long wait. 
QMAXACTLVL is numeric. The lower limit for QMAXACTLVL is 2. A change to this 
value takes effect immediately. 
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QMCHPOOL: Size of the machine storage pool. The machine storage pool contains 
highly shared machine and OS/400 programs. You must be careful when changing 
the size for this storage pool because system performance may be impaired if the 
storage pool is too small. A change to this value takes effect immediately. 
QMCHPOOL is numeric, must be specified in K bytes, and cannot be set to less than 
256 K bytes. 


This minimum value of 256 K bytes, which is enforced by the Change System Value 
(CHGSYSVAL) command, does not reflect the machine-enforced minimum value. The 
machine-enforced minimum value varies depending on the main storage size of the 
machine. The system automatically increases the actual size of the machine storage 
pool to the machine-enforced minimum value if the QMCHPOOL system value con- 
tains a smaller value. 


If the system has increased the actual size of the machine storage pool, you can use 
the Work with System Status (WRKSYSSTS) command to determine the actual 
machine-enforced minimum value for the machine storage pool (pool 1). 


Chapter 5, “Performance Guidelines” on page 5-1 contains a formula for deter- 

mining the size of the machine storage pool for your system. You should use the 
result of this calculation, rather than the machine-enforced minimum value, to set 
the QMCHPOOL system value when you tune the performance of your system. 
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Network Attributes 


Network attributes contain specifications that can be used for networking and com- 
munications. Network attributes are not objects and cannot be passed as parameter 
values like CL variables. 


The system is shipped with certain network attributes. Most of these are important 
only if your system is part of a communications network. However, you may want 
to change the system name because it appears on many OS/400 displays, including 
the sign-on display. 


The network attributes shipped with the system are shown in the following table. 
For more information about each network attribute, see the CL Reference, as well as 
the manuals listed in the table. 


Description Shipped Value Notes 
System name SYSNAME(based-on- See the C & SM User’s Guide. 
machine-serial-number) 
Local network ID to be assigned to LCLNETID(APPN) See the Communications User’s 
the system Guide and the APPC and APPN 
User’s Guide. 

Local control point name for the LCLCPNAME(based-on- See the Communications User’s 
system machine-serial-number) Guide and the APPC and APPN 


User's Guide. 
Default local location name for the LCLLOCNAME(based-on- See the Communications User’s 


system machine-serial-num ber) Guide and the APPC and APPN 
User’s Guide. 
Default mode name for the system DFTMODE(BLANK) See the Communications User’s 


Guide and the APPC and APPN 
User’s Guide. 


Maximum number of conversations MAXLOCCNV(64) See the APPC and APPN User’s 

for a remote location Guide. 

APPN node type NODETYPE(*ENDNODE) See the APPC and APPN User's 
Guide. 

Maximum number of intermediate MAXINTSSN(200) See the APPC and APPN User’s 

sessions Guide. 

APPN route addition resistance RAR(128) See the APPC and APPN User’s 
Guide. 

APPN network node servers NETSERVER See the APPC and APPN User’s 
Guide. 

Alert status ALRSTS(*OFF) See the C & SM User’s Guide. 


Figure 7-1 (Part 1 of 2). Network Attributes Shipped with the System 
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Description 

Specifies if the system is an alert 
primary focal point 

Specifies if the system is an alert 
default focal point 

Specifies which alerts will be logged 


Name of the controller through which 
alerts are sent on the SSCP-PU session 


Default message queue used in object 
distribution 


Default output queue used in object 
distribution 


Default action taken for job streams 
received by the system (used in object 
distribution) 


Maximum number of systems a distri- 
bution can pass through on its path to 
a destination on a SNADS network 


The action to be taken for DDM 
requests from other systems 


Specifies how PC Support requests 
will be handled 


Shipped Value 
ALRPRIFP(*NO) 


ALRDFTFP(*NO) 


ALRLOGSTS(*NONE) 
ALRCTLD(*NONE) 


MSGQ(QSYS/QSYSOPR) 


OUTQ(QGPL/QPRINT) 


JOBACN(*FILE) 


MAXHOP(255) 


DDMACC(*OBJAUT) 


PCSACC(*OBJAUT) 


Figure 7-1 (Part 2 of 2). Network Attributes Shipped with the System 


To display the current network attributes, use the Display Network Attributes 


Notes 
See the C & SM User’s Guide. 


See the C & SM User’s Guide. 


See the C & SM User’s Guide. 
See the C & SM User’s Guide. 


See the Distribution Services 


Network Administrator’s Guide. 


See the Distribution Services 


Network Administrator’s Guide. 


See the Distribution Services 


Network Administrator’s Guide. 


See the Distribution Services 


Network Administrator’s Guide. 


See the DDM User’s Guide. 


See the PC Support User’s 
Guide. 


(DSPNETA) command. To change the network attributes, use the Change Network 
Attributes (CHGNETA) command. To retrieve network attributes into a CL program, 
use the Retrieve Network Attributes (RTVNETA) command. To save network attri- 
butes with system values, use the Save System (SAVSYS) command. For more infor- 
mation on using these commands, see the CL Reference. 
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C: Chapter 8. Using Job Accounting 


This chapter describes the job accounting function which gathers data so that you 
can determine who is using your system and what system resources they are using. 
It also assists you in evaluating the overall use of your system. 


Job Accounting 


Typical job accounting data details the jobs running in your system and the 
resources they are using such as the use of the processing unit, printer, display 
stations, data base and communications functions. 


Job accounting is optional. You must take specific steps (described later in the 
section “Setting Up Job Accounting” on page 8-14) to set up job accounting. You 
: may also assign accounting codes to user profiles or specific jobs. 


Job accounting statistics are kept by using the journal entries made in the system 
accounting journal QSYS/QACGJRN. You should know how to perform journal man- 
agement operations, such as saving a journal receiver, changing journal receivers, 
and deleting old journal receivers. For more information about journal manage- 
ment, see the Backup and Recovery Guide. 


When you want to analyze the job accounting data, it must be extracted from the 
QACGIRN journal by use of the DSPJRN command. With this command you can 

c write the entries into a data base file. You must write application programs or use a 
utility such as the query utility to analyze the data. 


You may request the system to gather job resource accounting, printer file 
accounting data, or both. The system provides different journal entries for each 


type: 


e Job resource accounting: The job (JB) journal entry contains data summarizing 
the resources used for a job or for different accounting codes used in a job. 


( e Printer file accounting: 


— Dhirect print (DP) journal entry: Contains data about printer files produced 
on print devices (nonspooled). 


— Spooled print (SP) journal entry: Contains data about printer files made by 
a print writer (spooled). 
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Resource Accounting 
Resource accounting data is summarized in the JB journal entry at the completion of 
ajob. In addition, the system creates a JB journal entry summarizing the resources 
used each time a Change Accounting Code (CHGACGCDE) command occurs. The JB 
journal entry includes: 


Fully qualified job name 

Accounting code for the accounting segment just ended 

Processing unit time 

Number of routing steps 

Date and time the job entered the system 

Date and time the job started 

Total transaction time (includes service time, ineligible time, and active time) 
Number of transactions for all interactive jobs 

Auxiliary I/O operations 

Job type 

Job completion code 

Number of printer lines, pages, and files created if spooled or printed directly 
Number of data base file reads, writes, updates, and deletes 

Number of 08/400-ICF file read and write operations 


Some of the job accounting information can also be accessed using the CPF1124 and 
CPF1164 messages located in the QHST log. Job accounting data available through the 
QHST messages is a subset of the method described here. For more information on 
QHST messages, see the CL Programmer’s Guide. See “Deciding Whether to Use Job 
Accounting” on page 8-6 to determine the method to use. 
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Printer File Accounting 
There are two types of journal entries for printer file accounting: 


¢ DP for nonspooled printer files 
e SP for spooled printer files 


These two types of journal entries share a common journal entry format although 
some of the information is only available in the SP entry. The DP and SP journal 
entries include information such as: 


¢ Fully qualified job name 

e Accounting code 

e Device file name and library 

e Device name 

e Device type and model 

e Total number of pages and lines printed. If multiple copies occurred, this is the 
sum of all copies. 

¢ Spooled file name (only in the SP entry) 

¢ Spooled file number (only in the SP entry) 

¢ Qutput priority (only in the SP entry) 

e Form type (only in the SP entry) 

¢ Total number of bytes of control information and print data sent to the printer 
device. If multiple copies occurred, this 1s the sum of all copies. (This only 
applies to the SP entry.) 


The DP and SP journal entries occur when the file is printed. If a spooled file is 
never printed, no SP journal entry will appear. 
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Overview of Job Accounting 


The following figure provides an overview of job accounting as provided on the 


system: 


Job 1 


Resource 
accounting 


(JB) journal 
entry 


Close of an 
Accounting Period 
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When job | is completed, the system summarizes the resources used and 
writes the JB journal entry to the QACGJRN journal. If the accounting code 
was changed during the job, a JB journal entry would be written for each 
time the accounting code was changed and at the end of the job. Job 1 does 
not make any printer output, and no job log is made. Therefore, no DP or 
SP journal entries are made for job 1. 


Job 2 is printing a file directly to a printer. When the file is completed, a DP 
journal entry is written summarizing the printed data. When job 2 is com- 
pleted, the system summarizes the resources used and writes the JB journal 
entry. Job 2 does not make any spooled printer output and no job log is 
made. Therefore, no SP journal entry is made for job 2. 


Job 3 is printing to a file that is spooled. The SP journal entry is not written 
unless a print writer prints the file. When job 3 is completed, the system 
summarizes the resources used and writes the JB journal entry. Ifa job log 
is made at the completion of the job, it is a normal spooled file and an SP 
journal entry is created if the file is printed. 


A print writer is started to print the files made by one or more jobs. When 
the writer finishes a file, it makes an SP journal entry. The SP journal entry 
is not made if the file is canceled before printing starts. 


At the close of an accounting period (or whenever desired), the DSPJRN 
command can be used to write the accumulated journal entries into a data 
base file. 


User-written programs or the query utility can be used to analyze the 
accounting data. Reports such as resources used would compile data by a 
specific: 


¢ Accounting code 
e User 
¢ Job type 
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Job Accounting Operating Characteristics 


The AS/400 system attempts to allocate main storage as efficiently as possible. A 
job may not use the same amount of resources each time it is run. For example, if 
there are several active jobs on your system, a job spends more time reestablishing 
the resources needed for running than if a dedicated system environment is used. 
The system uses the job and run priorities assigned to different jobs to assist in man- 
aging main storage. Therefore, high priority jobs use less system resource than low 
priority jobs. 


Because of these system operating characteristics, you may want to apply your own 
interpretation or algorithm to the job accounting data collected. If you are charging 
for the use of your system, you may want to charge more for: 


e High priority jobs 
e Work done during peak system time 
¢ Use of critical resources 


Deciding Whether to Use Job Accounting 
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Because the QHST messages (CPF1124 and CPF1164) are always available in the QHST 
log, the first question to answer is: Which method should I use to gather job 
accounting statistics? The following guidelines should help you answer the question. 


Job accounting has all the information supplied by CPF1164 plus: 


e Accounting code 

e Number of print files, lines, and pages created by programs 

e Number of data base read, write, and update operations 

e Number of communications read and write operations 

e Actual lines and pages printed 

e Time the job was active and suspended 

e Actual number of bytes of control information and print data sent to the printer 


The job accounting function is more effective for gathering job accounting statistics 
if: 
e The resource information regarding data base, printer, and communications use 
is important. 
e Accounting codes are assigned to users or jobs. 
e The information for printed output is important. 
e¢ Job accounting must be done on an accounting segment basis in a job rather 
than on a complete job basis. 
e¢ The active and suspended time information is needed. 


The QHST messages are more effective for gathering job accounting statistics if: 


¢ You do not want to manage the additional objects included in journaling. 

¢ You do not need any resource information other than that provided in the 
CPF1124 and CPF1164 messages, which are sent automatically to the QHST log. 

¢ You do not need print accounting information. 
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Some statistics recorded in the CPF1164 message and the JB journal entries will not 
match exactly. This is due mainly to two factors: CPF1164 statistics are recorded 
slightly before the JB journal statistics; and each time an accounting code is changed, 
rounding occurs for some fields, while rounding occurs only once for CPF1164 mes- 
sages. 


Accounting Codes 


The initial accounting code (up to 15 characters in length) for a job is determined by 
the value of the ACGCDE (accounting code) parameter in the job description and user 
profile for the job. When a job is started, a job description is assigned to the job. 
The job description object contains a value for the ACGCDE parameter. If the 
default of *USRPRF is used, the accounting code in the job’s user profile is used. 
Note, however, that when a job is started using the Submit Job (SBMJOB) command, 
its accounting code is the same as that of the submitter’s job. You can change the 
accounting code after the job has entered the system by using the Change 
Accounting Code (CHGACGCDE) command. 


The CRTUSRPRF and CHGUSRPRF commands support the ACGCDE parameter. The 
default is *BLANK. If all work for a particular user is to be recorded under one 
accounting code, only user profiles need to be changed. You can change the 
accounting codes for specific job descriptions by specifying the desired accounting 
code for the ACGCDE parameter on the CRTJOBD and CHGJOBD commands. The 
CHGACGCDE command also allows different accounting codes in a single job. You 
can develop a method of verifying the assignment of accounting codes as described 
in “Validity Checking of Accounting Codes” on page 8-20 later in this chapter. 


The Retrieve Job Attributes (RTVJOBA) command allows you to access the current 
accounting code in a CL program. 
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Resource Accounting Data 2 


A JB journal entry is written at the end of every job and any time the job accounting 
code is changed by the CHGACGCDE command. A JB journal entry is written even if 
the accounting code is changed while the job is on the job queue although no 
resources have been used. Each resource accounting journal entry contains informa- 
tion about the resources used while the previous accounting code was in effect. 


For example, the following illustrates a job with two accounting segments: 


Start-of Job Point A End-of-Job 


<«— First Accounting Segment ——»'«— Second Accounting Segment 


Journal Journal 2 


Entry Entry 
Written Written 
P7730219-0 


At point A, the CHGACGCDE command was issued. The accounting code is changed 

and the JB journal entry is sent to the journal. The JB journal entry contains data 

for the first accounting segment. When the job ends, a second JB entry is made for 

the job containing data for the second accounting segment. J 


If the job accounting code was not changed during the existence of the job, the 
single JB entry summarizes the total resources used by the job. If the job accounting 
code was changed during the existence of the job, then you must add up the fields in 
the multiple JB entries in order to determine the total resources used by the job. The 
creation of a job log does not count toward the processing unit use for a job or its 
printed output in the JB accounting entries. However, if you are using print file 
accounting, the job log printed will be included in the printer file journal entries. 


General Accounting Journal Information | J 


Each journal entry contains the standard prefix fields for any journal entry (for 
example, date, time, journal sequence number). See the Backup and Recovery Guide 
for a discussion of these fields. 


% 
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JB Accounting Journal Information 


Field Name 


JAJOB 
JAUSER 
JANBR 
JACDE 
JACPU 


JARTGS 


JAEDTE 
JAETIM 


JASDTE 
JASTIM 
JATRNT 
JATRNS 
JAAUX 


JATYPE 
JCCDE 
JALINE 
JAPAGE 
JAPRTF 
JADBPT 
JADBGT 
JADBUP 


JACMPT 


JACMGT 


JAACT 


The following lists the various fields (found in field reference file QSYS/QAJBACG) in 


the JB journal entry: 


Description 

Job name 

Job user 

Job number 
Accounting code 


Processing unit time used (in millisec- 
onds) 


Number of routing steps 

Job entered the system 

— Job entry date (mmddyy format) 
— Job entry time (hhmmss format) 
Job start date and time 

— Job start date (mmddyy format) 
— Job start time (hhmmss format) 

Total transaction time (in seconds) 
Number of transactions 


Auxiliary I/O operations and data 
base operations (including page faults 
for any reason) 


Job type 

Completion code 

Number of print lines 

Number of printed pages 

Number of print files 

Number of data base write operations 
Number of data base read operations 


Number of data base update, delete, 
FEOD, release, commit, and rollback 
operations 


Number of communications write 
operations 


Number of communications read 
operations 


Time job was active (in milliseconds) 


Field Attributes 
Character (10) 
Character (10) 

Zoned (6,0) 
Character (15) 
Packed decimal (11,0) 


Packed decimal (5,0) 


Character (6) 
Character (6) 


Character (6) 
Character (6) 
Packed decimal (11,0) 
Packed decimal (11,0) 
Packed decimal (11,0) 


Character (1) 

Packed decimal (3,0) 
Packed decimal (11,0) 
Packed decimal (11,0) 
Packed decimal (11,0) 
Packed decimal (11,0) 
Packed decimal (11,0) 
Packed decimal (11,0) 


Packed decimal (11,0) 


Packed decimal (11,0) 


Packed decimal (11,0) 
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Comments 


See Note | 


See Note 2 


See Note 3 


See Note 4 
See Note 5 
See Note 6 


See Note 7 


See Note 7 


See Note 7 


See Note 8 


See Note 8 


Field Name Description Field Attributes Comments 


JASPN Time job was suspended (in millisec- | Packed decimal (11,0) 
onds) 


Notes: 


1. The processing unit time does not include processing unit use and printer statistics for the 
creation of job logs. 


2. For job completion date and time from journal entries, use the JODATE and JOTIME fields 
that are part of the standard journal entry prefix information. (See the Backup and Recovery 
Guide, for more information on these fields.) After an abnormal system ending, these fields 
contain the current date and time and not (as with CPF1164 messages) the actual time of the 
system ending. 


3. The last transaction (SIGNOFF) is not counted. 


4. The job types recorded are the following: 

Autostart job 

Batch job (includes communications and MRT) 
Interactive job 

Subsystem monitor 

Spooling reader 

Spooling writer 


ang w> 


Note: These are the same as those used in message CPF1164, except that message CPF1164 
includes some system job information not included in the journal entries. 


5. The completion codes, which are similar to those used for message CPF1164, are: 
000 Normal completion 
010 Normal completion during controlled end or controlled subsystem end 
020 Job exceeded end severity 
030 Job ended abnormally 


040 Job ended before becoming active 

050 Job ended while active 

060 Subsystem ended abnormally while job was active 
070 System ended abnormally while job was active 


080 Job completed in the time limit 
090 Job forced to complete after the time limit has ended 
099 Accounting entry caused by CHGACGCDE command 


6. The number of print lines does not reflect what is actually printed. Spooled files can be 
canceled or printed with multiple copies. The information in the JB journal entry reflects 
only what was written by the program. This excludes any lines written for the job log. See 
the discussion on DP and SP printer file accounting data later in this chapter. 


7. The numbers recorded for data base I/O operations do not include I/O operations to readers 
and writers, or I/O operations caused by the CL commands CPYSPLF, DSPSPLF, or WRKSPLF. 
If SEQONLY(*YES) is in effect, these numbers show each block of records read, not the 
number of individual records read. 


8. The numbers recorded for communications I/O operations do not include remote work 
station activity. When the I/o is for a communications device, the numbers include only 
activity related to OS/400-ICF files. 
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C 


DP and SP Printer File Accounting Data 


The accounting code used for the DP or SP journal entries is the accounting code of 
the job at the time the file is closed. Sometimes a DP or SP entry is created before 
the file is closed (such as when a writer which is creating a SCHEDULE(*IMMED) file is 
ended). When this happens the current accounting code of the job is used. 


A DP or an SP journal entry is created for each file printed. If the job log is spooled 
and then printed, an SP entry is created for it. Also, an SP entry is written for 
diskette spooled files redirected to a printer by the print writer. 


DP Accounting Journal Information 


The following lists the various fields (found in file QSYS/QAPTACG) in the DP journal 


entry: 


Field Name 


JAJOB 
JAUSER 
JANBR 
JACDE 
JADFN 
JADFNL 


JADEVN 
JADEVT 
JADEVM 
JATPAG 


JATLIN 


JASPFN 
JASPNB 
JAOPTY 
JAFMTP 
JABYTE 


Description 


Job name 

Job user 

Job number 

Accounting code 

Device file name 

Library in which device file is 
stored 

Device name 

Device type 

Device model 

Total number of print pages 
produced 

Total number of print lines 
produced 

Always blank 

Always blank 

Always blank 

Always blank 

Always zero 


Field Attributes 


Character (10) 
Character (10) 
Zoned (6,0) 

Character (15) 
Character (10) 
Character (10) 


Character (10) 
Character (4) 
Character (4) 

Packed decimal (11,0) 


Packed decimal (11,0) 


Character (10) 
Character (4) 
Character (1) 
Character (10) 
Packed decimal (15,0) 
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SP Accounting Journal Information 


The information provided is similar to that provided in the DP accounting journal 
data except that the spooled file name, spooled file number, output priority, form 
type, and total number of bytes of control information and print data sent to the 
printer are included. 


An SP journal entry is not written if a spooled file is deleted before a writer starts 
writing the file to the device. 


The following lists the various fields (found in file QSYS/QAPTACG) in the SP journal 


entry: 


Field Name 


JAJOB 
JAUSER 
JANBR 
JACDE 
JADFN 
JADFNL 


JADEVN 
JADEVT 
JADEVM 
JATPAG 


JATLIN 


JASPFN 
JASPNB 
JAOPTY 
JAFMTP 
JABYTE 


Notes: 


Description 


Job name 

Job user 

Job number 
Accounting code 
Device file name 
Library in which device 
file is stored 

Device name 

Device type 

Device model 

Total number of print 
pages produced 

Total number of print 
lines produced 
Spooled file name 
Spooled file number 
Output priority 

Form type 

Total number of bytes 
sent to the printer 


Field Attributes 


Character (10) 
Character (10) 
Zoned (6,0) 

Character (15) 
Character (10) 
Character (10) 


Character (10) 
Character (4) 
Character (4) 
Packed decimal 
(11,0) 

Packed decimal 
(11,0) 
Character (10) 
Character (4) 
Character (1) 
Character (10) 
Packed decimal 
(15,0) 


Comments 


See Notes 1, 2, 
3, and 4 
See Notes 1, 2, 
3, and 4 


See Notes 1, 2, 
3, and 4 


1. The system attempts to record the actual number of pages, lines, and bytes 
printed, but when a writer is canceled *IMMED or recovers from a device 
error (such as end of forms), it is not possible to determine the exact number 
of pages, lines, and bytes printed. 

2. Extra pages and lines produced with the alignment line are not included in 
the page, line, and byte counts. 

3. The page, line, and byte counts for the job and file separators are included 
with the counts for the file they are associated with. 

4. When an IPDS file contains graphics or bar codes and is sent to an IPDS 
printer that does not support graphics or bar codes, the page, line, and byte 
counts include the unprinted graphics and bar codes. 
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Cc Batch Processing 


Any batch job submitted during the running of a job using the SBMJOB command 
automatically uses the same accounting code as the job that submitted the batch job. 
When the SBMJOB command is used, the accounting codes cannot be overridden 
regardless of how the job description entry is coded. If you want the batch job to 
operate under an accounting code other than that of the submitting jobs, a 
CHGACGCDE command should be issued either: 


e Before and after the SBMJOB command is issued 
¢ Immediately by the batch job 


Batch jobs submitted using a reader or a SBMDBJOB or SBMDKTJOB command use the 
accounting code specified in the job description for the batch job. If the job 
description specifies ACGCDE(*USRPRF), the accounting code is taken from the user 
profile used for the job. 


c 


Interactive Processing 


If an interactive job has a fixed set of options for a user and each option has an 
assigned accounting code, it may be desirable to automatically assign a new code 
when the user requests to work on a new function. A typical approach would be for 
a menu option to request a new functional area. The CHGACGCDE command would 
then be issued within a CL program and the job values used for the previous 
accounting code would be summarized in the JB accounting journal entry. 


¢ | If a user has several assignments for which only he knows the accounting codes to be 
used, you can: 


e Give authority to the user to enter the CHGACGCDE command. 
¢ Write a program to prompt the user for the accounting code. 


System Job Processing 


System jobs that you control (for example, readers and writers) are assigned an 
( accounting code of *SyS. Other system jobs that you do not control (for example, 
QSYSARB, QLUS, SCPF) do not receive a journal entry. 


Note: You cannot use the CHGACGCDE command to change the accounting code of 
the subsystem monitor or a reader or writer. You can, however, change the 
accounting code of a reader or writer by changing the appropriate IBM-sup- 
plied job descriptions and user profiles and then starting them again. 
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Setting Up Job Accounting 
To set up resource or printer file accounting, perform the following: 


1. Create a journal receiver in a library of your choice by using the Create Journal 
Receiver (CRTJRNRCV) command: 


CRTJRNRCV JRNRCV(USERLIB/ACGJRN1) 


You should name the journal receiver ACGJRNI or a similar name that can be 
used to create a naming convention such as ACGJRN2, ACGJRN3, for future 
journal receivers. 


After you create the first receiver, you can create additional receivers and attach 
them to the QSYS/QACGIJRN journal automatically with the correct naming con- 
vention by using the CHGJRN JRNRCV(*GEN) command. You will probably want 
to place the journal receiver in one of your libraries that is saved regularly. 


You can specify options on the CRTJRNRCV command to assist in your opera- 
tional aspects. If you want to use dual journal receivers, you must create a 
second journal receiver. 


2. Create the journal QSYS/QACGIRN by using the Create Journal (CRTJRN) 
command. The name QSYS/QACGIJRN must be used, and you must have authority 
to add objects to QSYS. You need to specify the name of the journal receiver(s) 
you created in the previous step and any other options on the command. You 
should also consider who you want to have authority to this journal. 


3. As the security officer, change the accounting level system value QACGLVL using 
the CHGSYSVAL command. 


The VALUE parameter on the CHGSYSVAL command determines when job 
accounting journal entries are produced: 


VALUE 

Parameter Description 

*NONE The system does not produce any entries in the job 
accounting journal. 

*JOB The system produces a JB journal entry for each 
accounting segment of a job. 

*PRINT The system produces a DP or an SP journal entry for each 
file printed (either a nonspooled file or a spooled file 
written by a print writer). 

*JOB *PRINT The system produces both types of journal entries. 


The system requires that the QSYS/QACGJRN journal be created before this system 
value is changed to request job accounting. 


For information on processing the accounting journal entries, see the section “Con- 
verting Job Accounting Journal Entries” on page 8-19 later in this chapter. 
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Cc Accounting Journal 


The accounting journal QSYS/QACGJRN is processed as any other journal. Files can 
also be journaled to it although for simplicity it is recommended that you keep it 
solely for accounting information. You can use the SNDJRNE command to send other 
entries to this journal. While there are additional operational considerations 
involved in using several journals, there are advantages to not allowing any file 
entries in the QACGJRN journal. It is usually easier to control the QACGJRN journal 
separately so that all job accounting entries for a particular accounting period are in 
a minimal number of journal receivers and that a new journal receiver is started at 
the beginning of an accounting period. System entries also appear in the journal 
QACGJRN. These are the entries with a journal code of J, which relate to IPL and 
general operations performed on journal receivers (for example, a save of the 
receiver). 


Job accounting entries are placed in the journal receiver starting with the next job 
that enters the system after the CHGSYSVAL command takes effect. The accounting 

c level of a job is determined when it enters the system. If the QACGLVL system value 
is changed after the job is started, it has no effect on the type of accounting being 
performed for that job. The Dp and SP print entries occur if the job that created the 
file is operating under accounting and the system value is set for *PRINT. 


If damage occurs to the journal or to its current receiver so that the accounting 
entries cannot be journaled, a CPF1302 message is sent to the QSYSOPR message queue, 
and the accounting data is written to the QHST log in the CPF1303 message. The job 
trying to send the journal entry continues normally. Recovery from a damaged 
journal or journal receiver is the same as for other journals. See the Backup and 
c Recovery Guide for recovery considerations. 


The journal QACGJRN should not be allocated by another job. If the journal is allo- 
cated by another job, the journal entry is changed to message text and sent to the 


QHST log as message CPF1303. 


You can use the OUTFILE parameter on the Display Journal (DSPJRN) command to 
write the accounting journal entries to a data base file that you can process. 


( You can also use the RCVJRNE command on the QACGJRN journal to receive the 
entries as they are written to the QACGJRN journal. 
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Analyzing Job Accounting Data 2 


While the most obvious use for the accounting data is to charge users for system 
resources, you may want to analyze the data in other ways. Some methods of ana- 
lyzing the job accounting information would be sequencing by the following fields or 
combinations of fields: 


e Accounting code 

e User 

e Job type (for example, batch or interactive) 
e Time of day 


Each of these sequences could be processed by a separate logical file. 


A typical statistical analysis of a job would be a summary which reports on the: 


e Type of job run with a count of occurrences and totals on processing unit time 


used ) 
e Interactions 


e Average response time 
e Auxiliary 1/0 and file counts by type of file 


Other items you may want to analyze are: 


¢ Job termination code 
e User profile name 
e All jobs that exceed a certain amount of processing unit time 


Security Considerations 


Only the security officer (or a program adopting his authority) or a user with 
*ALLOBJ special authority can change the system value QACGLVL. The change takes 
effect when a new job enters the system. This restriction ensures that if job 
accounting is in effect and the security officer performs system IPL, an accounting 
entry 1s written for the security officer’s job. 


You can assign job accounting codes only if you have the authority to use the ) 
CRTUSRPRF, CHGUSRPRF or CHGACGCDE command. This restricts the use of 
accounting codes and provides a basis for validity checking any changes. 


Only a user with the *SECADM special authority is allowed to use the CRTUSRPRF 
and CHGUSRPRF commands. However, the security officer can delegate this 
authority by creating a CL program, which allows another user to adopt the security 
officer’s profile and change the ACGCDE parameter in the user profile. The CL 
program could then have authority to one or more individuals. 


The ACGCDE parameter also exists in job description objects, but the user must have 
the authority to use the CHGACGCDE command to enter a value other than the 
default of *USRPRF. This command is supplied with *CHANGE authority. 


If you allow a user to use the CHGACGCDE command, he can: 


e Create or change the ACGCDE parameter in job descriptions. (Authority to ; 
create or change job descriptions is also required.) 
e Change the accounting code in his current job. 
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e Change the accounting code of a job other than his own if he also has the 
*JOBCTL special authority. 


You can provide additional security by using the CHGACGCDE command in a CL 
program, which adopts the program owner’s authority. This allows the user who is 
running an external function to perform a security-sensitive function without having 
direct authorization to the CHGACGCDE command. 


The accounting journal and its receivers are treated as any other journal objects 
from a security viewpoint. Refer to the Backup and Recovery Guide, for a discussion 
of the journal security considerations. You must decide what authorization should 
exist for the accounting journal and journal receiver. 


Recovery Considerations 


If a job ends abnormally, the final accounting entry is written and all previously 
written accounting entries appear in the journal. 


If an abnormal system ending occurs, the following accounting data is lost to the last 
routing step or last end-of-accounting segment, whichever occurred most recently. 


e Information on the number of lines and pages printed 
e Number of files created 

e Data base put, get, and update operations 

¢ Communications put and get operations 

e Auxiliary I/O operations 

e Transaction time 

e Number of transaction fields 

e Time active 

e Time suspended 


Transaction time may be logged with a negative | (-1). This happens when the 
system date is moved ahead while an interactive job is in the middle of a transaction. 


After an abnormal system ending, the job completion time in the journal will not be 
the same as that in the CPF1164 message. The message uses the time nearest to that 
of the system ending, but the job accounting journal entries are sent to the journal 
during IPL, and the job completion time is the current system time, which is later 
than the time when the abnormal system ending occurred. 


If the system ends abnormally, some journal entries can be lost. These are the 
entries that are written to the journal but not forced to disk (this is equal to 
FORCE(*NO) on the SNDJRNE command). They include the following: 


e JB entries caused by a CHGACGCDE command 
¢ DP and SP entries 


Whenever a job completes, the last accounting code entry is forced to disk (as if 
FORCE(*YES) were specified on the SNDJRNE command). Whenever an accounting 
entry is forced to disk, all earlier entries in the journal, regardless of which job 
produced them, are forced to disk. 
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Exception: If only *PRINT accounting is specified on the system, there will not be 
any job ending FORCE(*YES) journal entries done. Therefore, if a critical accounting 
entry is written by a CHGACGCDE command and you want to ensure it will not be 
lost in case of an abnormal system ending, you could issue a SNDJRNE command and 
specify the FORCE(*YES) option. If files are also to be journaled to the accounting 
journal, any data base changes are always forced to the journal, and this causes all 
earlier accounting entries to also be forced. 


If an abnormal system ending occurs or you change an accounting code of a job 
other than your own, the qualified job name in the first 30 bytes of the JARES field in 
the journal entry describe the system job that wrote the JB entry at the next IPL and 
not the job that used the resources. The JAJOB, JAUSER, and JANBR fields should be 
used for analysis purposes. 


If the job accounting journal or journal receivers become damaged, the system con- 
tinues to operate and to record accounting data in the history log. To recover from 
the journal or journal receiver damage, use the Work with Journal (WRKIJRN) 
command. Refer to the Backup and Recovery Guide for more information about the 
use of this command. After recovering the damaged journal or journal receiver, 
change the system value QACGLVL to a value appropriate for your installation. 
(Unless you change the QACGLVL system value, the system will not record 
accounting information in the new journal receiver.) 


If you need to access the information from the CPF1303 message you will need to 
create a high-level language program. In order to define records that match the 
CPF1303 message you will need to include the following fields: 


System Time Char (8) 
Message Record Number Bin (4) 
Qualified Job Name Char (26) 
Entry Type (JB, DP, or SP) Char (2) 
Length of Data Bin (2) 


Followed by fields: 


JAJOB through JASPN for JB entries 
JAJOB through JABYTE for SP and DP entries 


(These fields are described earlier in this chapter.) 


For an example program, refer to the section in CL Programmer’s Guide, that dis- 
cusses processing the QHST file for the job completion message. 


The CPF1164 message always consists of three records and the CPF1303 message always 
consists of four records. 


The information contained in the standard journal prefix fields is not included in this 
message. All that is needed is information pertaining to the job end, date, and time; 
this information can be found in record | of the CPF1303 message. 
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C Converting Job Accounting Journal Entries 


You can use the OUTFILE parameter on the DSPJRN command to write the job 
accounting journal entries into a data base file that you can process. The OUTFILE 
parameter allows you to name a file or member. If the member exists, it is cleared 
before the records are written. If the member does not exist, it is added. If the file 
does not exist, a file is created using the record format QJORDJE. This format defines 
the standard heading fields for each journal entry, but the job accounting data is 
defined as a single large field. 


To avoid having to process the accounting data as a single large field, two field ref- 

erence files are supplied to help you in processing the job accounting journal entries. 

The file QSYS/QAJBACG contains the record format QWTJAJBE and is used for JB 

entries. File QSYS/QAPTACG contains record format QSPJAPTE and is used for DP or 

SP entries. The same format is used for all printer file entries regardless of if the 

Output is SP (spooled) or DP (nonspooled). The DP entry for directly printed files 
Cc contains some fields that are not used; these fields contain blanks. 


The following are some approaches you might use: 


e The basic JB entries and DP or SP entries can be processed by creating two 
output files using the supplied field reference file formats and running the 
DSPJRN command once for JB and once for DP or SP. This allows you to define 
a logical file over the two physical files and use an high-level language program 
to process the externally described file. This solution is recommended and 
described later in this section. 


c e You can process only the JB entries by creating a file using one of the supplied 
field reference files (QSYS/QAJBACG) to create an externally described file. This 
file can then be processed by the query utility or an high-level language 
program. 


¢ You can convert both types of journal entries using the default DSPJRN format of 
QJORDJE. You would then use a program-described file to process the journal 
entries in a high-level language program. 


The following DDs defines a physical file for the JB journal entries using the 
i QAJBACG field reference file in QSYS. You would normally create the file (using the 
CRTPF command) with the same name (QAJBACG) as the model file. 


R QWTJAJBE FORMAT(QSYS/QAJBACG) 


The following DDs defines a physical file for the DP or SP journal entries using the 
the QAPTACG field reference file in QSYS. You would normally create the file (using 
the CRTPF command) with the same name (QAPTACG) as the model file. 


R QSPJAPTE FORMAT (QSYS/QAPTACG) 


You can specify a key field in either physical file; however, in this example, a logical 
file is used for sequencing. 


If you create two physical files (one for JB and one for DP or SP) with the members 

of the same name, you would issue the following DSPJRN commands to convert the 

entries. Assume that you have created the physical files with the same names as the 
SS model files in your library YYYY. 
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DSPJRN JRN(QACGJRN) JRNCDE(A) ENTTYP(JB) OUTPUT(*NONE) + 
OUTFILE(YYYY/QAJBACG) 

DSPURN JRN(QACGJRN) JRNCDE(A) ENTTYP(SP DP) OUTPUT(*NONE) + 
OUTFILE(YYYY /QAPTACG) 


You can control the use and selection criteria of the DSPJRN command so that you 
do not convert the same entries several times. For example, you can select all entries 
in a specific range of dates. You could convert all of the entries at a cutoff point for 
your job accounting analysis, for example, monthly. One or more journal receivers 
may have been used during the month. Note that each use of the DSPJRN command 
to the same member causes the member to be cleared before any new entries are 
added. Do not use the JOB parameter of the DSPJRN command as some entries are 
made for a job by a system job and will therefore not appear as you may expect 
them to. 


Enter the following DDS to create a logical file to allow processing of both physical 
files. This allows you to read a single file in accounting code order and print a 
report using a high-level language program: 


R QWTJAJBE  PFILE(YYYY/QAJBACG) 
K JACDE 
R QSPJAPTE PFILE(YYYY/QAPTACG) 
K JACDE 


If you want to use a logical file to process only the basic job accounting record in 
accounting code order by a user name, you would enter the following DDS for a 
logical file: 


R QWTJAJBE  PFILE(YYYY/QAJBACG) 
K JACDE 
K JAUSER 


This logical file can be processed by the query utility or by a high-level language 
program. 


If an abnormal system ending occurs, the qualifed job name in the first 30 bytes of 
the JARES field in the journal entry describe the system job that wrote the entry at 

the next IPL and not the job that used the resources. For this reason, any analysis 

done on the JB entries should use the JAJOB, JAUSER, and JANBR fields. 


Job Accounting Approaches 


The following approaches may be useful to you in the setting up and managing your 
job accounting function. 


Validity Checking of Accounting Codes 
An important aspect of any data processing application is ensuring that the correct 
control fields are specified. For job accounting codes, this can require a complex 
validity-checking function which not only checks for the existence of authentic codes, 
but also checks which users are allowed to use specific codes. 


Accounting codes can be assigned in the following areas: 


e User profile 
¢ Job description 
¢ In a job (CHGACGCDE command) 
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Controlling the Assignment of Accounting Codes in User Profiles 
If it is important to control the assignment of accounting codes, you may want to 
consider the following approach. Before an accounting code is placed in a user 
profile, you may want to ensure that the code is valid and that it is valid for a par- 
ticular user. 


You could control the changing of accounting codes on the CHGJOBD command by 
giving only the security officer authority to the CHGACGCDE command, and there- 
fore, another user could not create or change a job description with a specific 
accounting code. 


The CHGACGCDE command could be used directly to allow users to change the job 
accounting code of their own or another job. To change another job, the user must 
also have the special authorization of *JOBCTL. 


In many installations, it would not be valid to allow the change of an accounting 
code for a job on the job queue or for one job to change the accounting code of 
another job. Controlling this and ensuring validity checking of the new accounting 
code could be done with a CL program and command. 


For example, the CHGACGCDE command would be privately authorized and included 


in a CL program where it only changed the current job (for example, JOB(*) is speci- 
fied). The command would be authorized appropriately. 
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Glossary 


access. To read; the ability to use or read. 


access method. A method used to read a record from, 
or to write a record into a file. Access can be sequential 
(records are referred to one after another in the order in 
which they appear in the file), it can be random (the 
individual records can be referred to in any order), or it 
can be dynamic (records can be accessed sequentially or 
randomly, depending on the specific request). 


access path. The order that records in a data base file 
are organized for processing by a program. See arrival 
sequence access path and keyed sequence access path. 


accounting code. A 15-character field, assigned to a job 
by the system when it is processed by the system, that is 
used to collect statistics for the system resources used 
for that job when job accounting is active. 


accounting entry. A journal entry that contains statistics 
of system resources used for job accounting. 


accounting level. A system value identifying the type of 
data to be journaled when job accounting is active. 


accounting segment. The period of time during which 
statistics are gathered, beginning when the job starts or 
when the job’s accounting code is changed, and ending 
when the job ends or when the job’s accounting code is 
next changed. 


acknowledgment (ACK) character. (1) (BSC) The BSC 
transmission control character that is sent as a positive 
response to a data transmission. See also 4cxo and 
ACKI. (2) (RJE) A transmission control character 
sequence that is sent as a positive response to a data 
transmission. 


acknowledgment. Positive response to a data trans- 
mission. 


ACKO. The even-numbered, positive acknowledgment 
character, which indicates that text was received without 
transmission errors. See acknowledgment (ACK) char- 
acter. 


ACK1. The odd-numbered, positive acknowledgment 
character, which indicates that text was received without 
transmission errors. See acknowledgment (ACK) char- 
acter. 


acquire-program-device operation. An operation that 
makes a program device available for input or output 
operations. Contrast with release-program-device opera- 
tion. 


active group job. A group job that was not suspended 
by the Transfer to Group Job (TFRGRPJOB) command. 


activity level. A characteristic of main storage or of the 
processing unit that specifies the maximum number of 
jobs that can run at the same time in the main storage 
or in the processing unit. 


actuator. (1) The device within an auxiliary storage 
device that moves the read/write heads. (2) A device 
that causes mechanical motion. 


add authority. A data authority that allows the user to 
add entries to an object; for example, add job entries to 
a job queue or add records to a file. Contrast with 
delete authority. See also read authority and update 
authority. 


address. (1) The location in the storage of a computer 
where particular data is stored. Also, the numbers that 
identify such a location. (2) In data communications, 
the unique code assigned to the location of each device 
or system connected in a network. (3) The second part 
of a two-part user identification used to send distribu- 
tions. See also user [D/address. 


adopted authority. Authority given to the user by the 
program for the duration of the job that uses that 
program. The program must be created with owner 
authority. 


advanced peer-to-peer networking (APPN). Data com- 
munications support that routes data in a network 
between two or more APPC systems that are not directly 
attached. 


advanced program-to-program communications (APPC). 
Data communications support that allows programs on 
an AS/400 system to communicate with programs on 
other systems having compatible communications 
support. APPC is the AS/400 method of using the SNA 
LU session type 6.2 protocol. 


alert. A record sent to a focal point to identify a 
problem or an impending problem. 


alert controller. The host system, specified on the 
Change Network Attributes (CHGNETA) command by 
the ALRCTLD parameter, that collects and processes the 
alerts. 


alert focal point. The location in a network specified as 
the forwarding node to the host system. An alert focal 


point is a subset of a problem management focal point. 


all authority. An object authority that allows the user 
to perform all operations on the object except those 
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limited to the owner or controlled by authorization list 
management authority. The user can control the 
object’s existence, specify the security for the object, and 
change the object. Contrast with exclude authority. 


all object authority. A special authority that allows 
users to use all system resources without having specific 
authority to the resources. See also save system 
authority, job control authority, security administrator 
authority, service authority, and spool control authority. 


allocate. To reserve (lock) a resource for use in per- 
forming a specific task. Contrast with deallocate. 


alternative console. A display device assigned by the 
operating system to function as the console if the 
console is not working. 


APPC. See advanced program-to-program communi- 
cations (APPC). 


application program. A program used to perform a par- 
ticular data processing task such as inventory control or 
payroll. 


application program interface. A functional interface 
supplied by the operating system or a separately 
orderable licensed program that allows an application 
program written in a high-level language to use specific 
data or functions of the operating system or the licensed 
program. 


APPN. See advanced peer-to-peer networking (APPN). 


arrival sequence access path. An access path to a data 
base file that is arranged according to the order in 
which records are stored in the physical file. See also 
keyed sequence access path and access path. 


ASP. See auxiliary storage pool. 


assumed value. A value supplied by the system when no 
value is specified by the user. 


asynchronous. (1) Not occurring in a regular or predict- 
able pattern. (2) Without regular time relationship. 


asynchronous I/O. A series of input/output operations 
that are being done separately from the job that 
requested them. 


asynchronous processing. A series of operations that are 
done separately from the job in which they were 
requested; for example, submitting a batch job from an 
interactive job at a work station. Contrast with synchro- 
nous processing. 


Attention-key-handling program. A user-defined 


program that is called when the work station user 
presses the Attention (Attn) key. 
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attribute. A characteristic or property of one or more 
objects. 


authorize. Permit or give authority to. 


automatically started job entry. A work entry in a sub- 
system description that specifies a job to be automat- 
ically started each time the subsystem is started. 


auxiliary storage. All addressable storage other than 
main storage. 


auxiliary storage pool. A group of disk units defined 
from the auxiliary storage devices. Abbreviated Asp. 
See also system ASP and user ASP. 


base pool. A storage area that contains all unassigned 
main storage on the system and whose minimum size is 
specified in the system value QBASPOOL. The system- 
recognized identifier is *BASE. 


batch. Pertaining to a group of jobs to be run ona 
computer sequentially with the same program with little 
or no operator action. Contrast with interactive. 


batch device. Any device that can read serial input or 
write serial output, or both, but cannot be used to com- 
municate interactively with the system. Examples of 
batch devices are printers, magnetic tape units, or 
diskette units. 


batch job. A predefined group of processing actions 
submitted to the system to be performed with little or 
no interaction between the user and the system. Con- 
trast with interactive job. 


batch subsystem. A part of main storage where batch 
jobs are processed. 


BCC. See block-check character (BCC). 


beacon message. A message frame sent repeatedly by an 
adapter indicating a serious network problem, such as a 
broken cable. See also beaconing. 


beaconing. Pertaining to an adapter in a token-ring 
network that repeatedly sends a frame (beacon message) 
when it is not receiving a normal signal because of 
serious error, such as a line break or power failure. The 
message frame repeats until the error is corrected or 
bypassed. 


binary. (1) * (iSO) Pertaining to a selection, choice, or 
condition that has two possible values. (2) A num- 
bering system with a base of two (0 and 1). 


binary synchronous communications (BSC). A data com- 
munications line protocol that uses a standard set of 
transmission control characters and control character 
sequences to send binary-coded data over a communi- 
cations line. Contrast with synchronous data link control 
(SDLC). 


block. (1) A group of records that are recorded or pro- 
cessed as a unit. (2) A set of adjacent records stored 
as a unit on a disk, diskette, or magnetic tape. (3) In 
data communications, a group of records that are 
received, processed, or sent as a unit. (4) A sequential 
group of statements (defined using line commands) that 
are processed as a unit. 


block-check character (BCC). The BSC transmission 
control character that is used to determine if all of the 
bits that were sent were also received. 


bpi. Bits per inch. 
bps. Bits per second. 


bracket. One or more chains of request units and their 
responses, representing a complete transaction, 
exchanged between two logical unit half-sessions. See 
also RU chain. 


BSC. See binary synchronous communications (BSC). 


byte. A group of eight adjacent bits. In the EBCDIC 
coding system, one byte can represent a character. In 
the double-byte coding system, two bytes represent a 
character. 


C & SM. See communications and systems management 
(C& SM). 


call level. The position of a program in a nest of pro- 
grams called explicitly by the CALL instruction or implic- 
itly by some event. The first program has a call level of 
1. Any program called by a level 1 program has a call 
level of 2, and so on. 


change authority. An object authority that allows a user 
to perform all operations on the object except those 
limited to the owner or controlled by object existence 
authority and object management authority. The user 
can add, change, and delete entries in an object, or read 
the contents of an entry in the object. Change authority 
combines object operational authority and all the data 
authorities. 


character. Any letter, number, or other symbol in the 
data character set that is part of the organization, 
control, or representation of data. 


character key. A keyboard key that allows the user to 
type into the system the character shown on the key. 
See also function key. 


characters per inch (cpi). The number of characters 
printed horizontally within an inch across a page. 


checksum protection. A function that protects data 
stored in the system auxiliary storage pool from being 
lost because of the failure of a single disk. When 
checksum protection is in effect and a disk failure 
occurs, the system automatically reconstructs the data 


when the system program is loaded after the device is 
repaired. 


checksum set. Units of auxiliary storage defined in 
groups to provide a way for the system to recover data 
if a disk failure occurs when checksum protection is in 
effect. 


CL. See control language (cL). 


class attributes. The values in the Change Job (CHGJoB) 
command that control the processing of routing steps in 
a job. These values include the run priority, time slice, 
delete, and default wait time-out parameters. 


command. A statement used to request a function of the 
system. A command consists of the command name, 
which identifies the requested function, and parameters. 


command attention (CA) key. A keyboard key that can 
be specified with the CA keyword to request the function 
specified by the keyword. Data is not returned to the 
system. Contrast with command function (CF) key. 


command definition. An object that contains the defi- 
nition of a command (including the command name, 
parameter definitions, and validity checking informa- 
tion) and identifies the program that performs the func- 
tion requested by the command. The system-recognized 
identifier for the object type is *CMD. 


command function (CF) key. A keyboard key that can 
be specified with the CF keyword to request the function 
specified by the keyword. Data is returned to the 
system. Contrast with command attention (CA) key. 


command line. The blank line on a display where com- 
mands, option numbers, or selections can be entered. 


command processing program (CPP). A program that 
processes a command. This program performs some 
validity checking and processes the command so that the 
requested function is performed. 


communications and systems management (C & SM). A 
part of the system that contains the remote management 
support (also referred to as DHCF), the change manage- 
ment support (referred to as DSNX), and the problem 
management support (referred to as alerts). 


communications controller. The 1/O processor card in the 
card enclosure. 


communications line. The physical link (such as a wire 
or a telephone circuit) that connects one or more work. 
stations to a communications control unit, or connects 
one control unit to another. Contrast with data link. 


completion message. A message that tells the operator 
when work is successfully ended. 


concept. An abstract idea. 
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configuration. The arrangement of devices and pro- 
grams that make up a data processing system. See also 
system configuration. 


configure. (1) To describe the interconnected arrange- 
ment of the devices, programs, communications, and 
optional features installed on a system. (2) To describe 
setting up auxiliary storage pools and check sum pro- 
tection. 


consecutive processing. A method of processing in which 
the records in the file are read, written to, or deleted in 
the order in which they exist in a file. See also random 
processing and sequential processing. 


console. A display station from which an operator can 
control and observe the system operation. 


control block. A storage area used by a program to 
hold control information. 


control language (CL). The set of all commands with 
which a user requests system functions. 


control language program. A program that is created 
from source statements consisting entirely of control 
language commands. 


control language variable. A program variable that is 
declared in a control language program and is available 
only to the CL program. 


control panel. A panel located on the processing unit on 
the front of the rack that contains lights and switches to 
operate or service the system. 


control storage. Storage in the computer that contains 
the programs used to control input and output oper- 
ations and the use of main storage. Contrast with main 
storage. 


controller. A device that coordinates and controls the 
operation of one or more input/output devices (such as 
work stations) and synchronizes the operation of such 
devices with the operation of the system as a whole. 


controller description. An object that contains a 
description of the characteristics of a controller that is 
either directly attached to the system or attached to a 
communications line. The system-recognized identifier 
for the object type is *CTLD. 


conversation. In interactive communications, the com- 
munication between the application program and a spe- 
cific item (usually another application program) at the 
remote system. 


cpi. See characters per inch (cpi). 


creation date. The system date when an object is 
created. See also job date, and system date. 
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CTLD. See controller description. 


current interrupted job. When a job is interrupted by 
pressing the Attn key, another job can be started from a 
command display. This job can also be interrupted by 
pressing the Attn key again. The current interrupted 
job is the most recently interrupted. The job name for 
the current interrupted job is displayed at the top of the 
Inquiry Options menu. 


current library. The library that is specified to be the 
first user library searched for objects requested by a 
user. The name for the current library can be specified 
on the Sign-On display or in a user profile. When you 
specify an object name (such as the name of a file or 
program) on a command, but do not specify a library 
name, the system searches the libraries in the system 
part of the library list, then searches the current library 
before searching the user part of the library list. The 
current library is also the library that the system uses 
when you create a new object, if you do not specify a 
library name. 


data area. A storage area used to communicate data 
such as CL variable values between the programs within 
a job and between jobs. The system-recognized identi- 
fier for the data area is *DTAARA. 


data authority. A specific authority to read, add, 
update, or delete data. See also add authority, delete 
authority, read authority, and update authority. 


data base. The collection of all data files stored in the 
system. 


data base file. An object that contains descriptions of 
how input data is to be presented to a program from 
internal storage and how output data is to be presented 
to internal storage from a program. See also physical 
file and logical file. 


data description specifications (DDS). A description of 
the user’s data base or device files that is entered into 
the system in a fixed form. The description is then used 
to create files. 


data file. (1) A collection of related data records organ- 
ized in a specific order. (2) A file created by the spec- 
ification of FILETYPE(*DATA) on the create commands. 


data link. The physical connection (communications 
lines, modems, controllers, work stations, and other 
communications equipment), and the rules (protocols) 
for sending and receiving data between two or more 
locations in a data network. Contrast with communi- 
cations line. 


DBCS. See double-byte character set (DBCS). 


DDM. See distributed data management (DDM). 


DDM file. A file description, created by a user on the 
local (source) system, for a file that is stored on a 
remote (target) system. The DDM file provides the infor- 
mation needed for a local system to locate a remote 
system and to access the data in the remote file. 


DDS. See data description specifications, 


deallocate. To release a resource that is assigned to a 
specific task. Contrast with allocate. 


dedicated service tools (DST). The part of the service 
function used to service the system when the operating 
system is not working. 


dedicated system. A system intentionally reserved for a 
single job or task. 


default. A value automatically supplied or assumed by 
the system or program. 


default focal point. A network node that receives alerts 
from nodes that do not have defined focal points. Con- 
trast with primary focal point. 


default routing entry. The routing table entry specifying 
the route to be used when the table contains no explicit 
routing entry. 


default user name. A system-provided name for a user 
identification for a computer system that does not want 
to require separate user identifications. 


default value. A value supplied by the system that is 
used when no value is specified by the user, or the value 
specified by the user with the DFT keyword in DDS. See 
also assumed value. 


definite response. A value in the response-requested 
field of the request header (RH). The value directs the 
receiver of the request to return a response uncondi- 
tionally, whether positive or negative, to that request. 


delete authority. A data authority that allows the user 
to remove entries from an object; for example, delete 
messages from a message queue or delete records from a 
file. Contrast with add authority. See also read 
authority and update authority. 


delimiter. A character or sequence of characters that 
marks the beginning or end of a unit of data. 


DEVD. See device description. 


device description. Information describing a particular 
device that is attached to the system. The system- 
recognized identifier for the object type is *DEVD. 


device file. A file that contains a description of how 
data is to be presented to a program from a device or 
how data is to be presented to the device from the 


program. Devices can be display stations, printers, a 
diskette unit, tape units, or a communications line. 


diagnostic. Pertaining to the detection and isolation of 
an error. 


diagnostic message. A message that contains informa- 
tion about errors or possible errors. This message is 
generally followed by an escape message. 


disk. (1) A storage media made of one or more flat, 
circular sheets with magnetic surfaces on which informa- 
tion can be stored, (2) A direct-access storage medium 
with magnetically recorded data. 


diskette writer. A function of the operating system that 
writes the spooled output from a program to a diskette 
device. See also print writer and spooling writer. 


display file. A device file created by the user to support 
a display station. 


display station. A device that includes a keyboard from 
which an operator can send information to the system 
and a display screen on which an operator can see the 
information sent to or the information received from the 
system. 


distributed data management (DDM). A function of the 
operating system that allows an application program or 
user on one system to use data files stored on remote 
systems. The systems must be connected by a communi- 
cations network, and the remote systems must also be 
using DDM. 


do group. A set of commands in a control language 
program defined by a DO command and an ENDDO 
command that is conditionally processed as a group. 
Contrast with block. 


document authority. Permission granted to one user to 
work with documents that are owned by another user. 


double-byte character set (DBCS). A set of characters in 
which each character is represented by 2 bytes. Lan- 
guages such as Japanese, Chinese, and Korean, which 
contain more symbols than can be represented by 256 
code points, require double-byte character sets. Because 
each character requires 2 bytes, typing, displaying, and 
printing DBCs characters requires hardware and sup- 
porting programs that are DBCS-capable. 


DST. See dedicated service tools (DST). 


dump. (1) (PAR) To write, at a particular instant, all or 
part of the contents of main or auxiliary storage onto 
another data medium for the purpose of protecting the 
data or collecting error information. (2) To copy data 
from main or auxiliary storage onto an external 
medium, such as tape, diskette, or printer. 
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end node. A node in an APPN network that can be a 
source or target node, but does not provide any routing 
or session services to any other node. 


end-of-file delay. An interval during which the system 
holds a file open after the normal end of the file is 
reached until one or more records are updated or added 
to the end of the file. The length of the interval can be 
specified on the EOFDLY parameter. 


end-of-transmission (EOT) character. The BSC trans- 
mission control character used to end transmission with 
the remote system. 


ENQ. See enquiry (ENQ) character. 


enquiry (ENQ) character. The BSC transmission control 
character usually used to request a response from the 
remote system or device. 


EOT. See end-of-transmission (EOT) character. 
even positive acknowledgment. See ACKO. 


exclude authority. An object authority that prevents the 
user from using the object or its contents. Contrast 
with all authority. 


external message queue. The part of the job message 

queue that sends messages between an interactive job 
and the work station user. For batch jobs, messages 

sent to the external message queue appear only in the 
job log. 


external object. An object that has a defined object type 
(such as *FILE or *PGM). In general, external objects 
can be displayed by a user. See also object. Contrast 
with internal object. 


field. A group of related characters (such as name or 
amount) that are treated as a unit on a record. 


file. A generic term for the object type that refers to a 
data base file, a device file, or a set of related records 
treated as a unit. The system-recognized identifier for 
the object type is *FILE. 


file description. The data description specifications that 
describe the file and its contents. 


file name. The name used by a program to identify a 
file. See also label. 


file separator. The pages produced at the beginning of 
each output file and used to separate the file from the 
other files being sent to an output device. 


function key. A keyboard key that allows the user to 


select keyboard functions or programmer functions. 
Contrast with character key. 
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general-purpose library. The library shipped with the 
system that contains IBM-provided objects required for 
many system functions and user-created objects that are 
not explicitly placed in a different library when they are 
created. Named QGPL. 


generic. Relating to, or characteristic of, a whole group 
or Class. 


generic name. The characters common to object names 
that can be used to identify a group of objects. A 
generic name ends with an * (asterisk). For example, 
ORD* identifies all objects whose names begin with the 
characters ORD. 


group authority. Authority to use objects, resources, or 
functions from a group profile. 


group data area. A data area that is automatically 
created when an interactive job becomes a group job. 
This data area is shared by all jobs in the group but 
cannot be used by jobs outside the group. 


group job. One of up to sixteen interactive jobs that are 
associated in a group with the same work station device 
and user. 


group job name. A name that is assigned to an interac- 
tive job when it is changed into a group job using the 
Change Group Attributes (CHGGRPA) command or when 
a group job is started using the Transfer to Group Job 
(TFRGRPJOB) command. This name is used within the 
group to identify the job. 


group job transfer. An operation performed by the 
Transfer to Group Job (TFRGRPJOB) command that will 
either start a new group job or resume an existing group 
job. 


group message queue. A message queue associated with 
a group of jobs. When the message queue is set to 
break or notify mode in the active group job, it is set to 
the same mode in any job in the group that is trans- 
ferred to or to any job that gains control when the 
active group job is canceled. 


group profile. A user profile that provides the same 
authority to a group of users. 


hex. See hexadecimal. 


hexadecimal. Pertaining to a numbering system with a 
base of 16. 


host system. The primary or controlling computer in a 
communications network. See also control station. 


I/O. See input/output. 
ideographic. Pertaining to 2-byte characters consisting 


of pictograms, symbolic characters, and other types of 
symbols. 


IGC. Abbreviation used in commands and keywords to 
represent double-byte character set functions. 


independent work station. A work station that is pro- 
grammable and operates independently of a host system, 
but can communicate with it and use selected system 
services. A Displaywriter is an example of an inde- 
pendent work station. 


initial program. A user-profile program that runs when 
the user signs on and after the command processor 
program QCMD is started. QCMD calls the first program. 


initial program load (IPL). The process that loads the 
system programs from the system auxiliary storage, 
checks the system hardware, and prepares the system 
for user operations. 


initialize. To set the addresses, switches, or the contents 
of storage to zero, or to the starting value set by the 
manufacturer. 


inline data file. A file described by a Data command 
that is included as part of a job when the job is read 

from an input device. The file is erased when the job 
ends. 


input/output. Data provided to the computer or data 
resulting from computer processing. 


input/output processor (IOP). One or more circuits of 
an input/output controller that processes programmed 
instructions, and controls one or more input/output 
devices or adapters. 


inquiry mode. An operation during which the job cur- 
rently running from a display station is interrupted so 
that other work can be done. The operator presses the 
Attn key to put the display station in inquiry mode. 


interactive. Pertaining to the exchange of information 
between people and a computer. Contrast with batch. 


interactive job. A job started for a person who signs on 
to a work station. Contrast with batch job. 


interactive subsystem. A subsystem in which interactive 
jobs are processed. 


interface. A shared boundary. An interface might be 
the hardware to connect two devices or it might be a 
part of main storage, or registers used by two or more 
computer programs. 


internal object. An object that the system program uses 
to store the information needed to perform some system 
functions. Internal objects cannot be displayed by a 
user. For example, you cannot use a display command 
(like the Display Library (DSPLIB) command) to display 
internal objects. Contrast with external object. 


internal storage. All main and auxiliary storage in the 
system. 


IOP. See input/output processor. 
IPL. See initial program load (IPL). 


Japanese basic-Kanji character set. A subset of 
Japanese DBCS, consisting of commonly used Kanji char- 
acters. There are 3,226 Kanji characters in this set. 


Japanese double-byte character set. An IBM-defined 
double-byte character set for Japanese, consisting of the 
Japanese non-Kanji set, basic Kanji set, extended Kanji 
set, and up to 4,370 user-definable characters. 


Japanese extended-Kanji character set. A subset of 
Japanese DBCS, consisting of less commonly used Kanji 
characters. There are 3,487 characters in this set. 


Japanese non-Kanji character set. A subset of Japanese 
DBCS, consisting of non-Kanji characters like Greek, 
Russian, Roman numeric, alphanumeric and related 
symbols, Katakana, Hiragana, and special symbols. 
There are 550 characters in this set. 


job accounting. A system function that collects informa- 
tion about a job’s use of system resources and records 
that information in a journal. 


job action. The network attribute that controls the han- 
dling of a job submitted from remote locations through 
either the SNADS network or RSCS. 


job control authority. A special authority that allows a 
user to: change, delete, display, hold, and release all 
files on output queues; hold, release, and clear job 
queues and output queues; start writers to output 
queues; hold, release, change, and end other users’ jobs; 
change the class attributes of a job; end subsystems; and 
start (IPL) the system. See also all object authority, save 
system authority, security administrator authority, service 
authority, and spool control authority. 


job date. The date associated with a job. The job date 
usually assumes the system date, but it can be changed 
by the user. See also creation date and system date. 


job description. A system object that defines how a job 
is to be processed. The object name is *JOBD. 


job log. A record of requests submitted to the system 
by a job, the messages related to the requests, and the 
actions performed by the system on the job. The job 
log is maintained by the system program. 


job message queue. A message queue that is created for 
each job. A job message queue receives requests to be 
processed (such as commands) and sends messages that 
result from processing the requests. A job message 
queue consists of an external message queue and a set of 
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program message queues. See also external message 
queue and program message queue. 


job name. The name of the job as identified to the 
system. For an interactive job, the job is assigned the 
name of the work station at which the job was started; 
for a batch job, the name is specified in the command 
used to submit the job. Contrast with qualified job 
name. 


job queue. A list of batch jobs waiting to be started or 
processed by the system. The system-recognized identi- 
fier for the object type is *JOBQ. 


journal. A system object used to record entries in a 
journal receiver when a change is made to the data base 
files associated with the journal. The object type is 
*JRN. See also journal receiver. 


journal code. A 1-character code in a journal entry that 
identifies the primary category of the journal entry; for 
example, F identifies a file-level entry. See also journal 
entry. 


journal entry. A record in a journal receiver that con- 
tains information about data base files being journaled. 
See also journal code, journal entry identifier, journal 
entry qualifier, and journal entry type. 


journal entry identifier. The fields in a journal entry 
that identify the category of the journal entry, the type 
of journal entry, the date and time of the entry, the job 
name, the user name, and the program name. 


journal entry qualifier. The part of a journal entry that 
identifies the name of the object for which the journal 
entry was created. 


journal entry type. A 2-character field in a journal entry 
that identifies the type of user-generated or system- 
generated journal entry; for example, PT is the entry 
type for a put operation. See also journal code and 
journal entry identifier. 


journal receiver. A system object that contains journal 
entries recorded when changes are made to the data in 
data base files or the access paths associated with the 
data base files. The object type is *JIRNRCV. See also 
journal. 


Kanji. Chinese characters used in Japanese written lan- 
guage. 


keyed sequence access path. An access path to a data 
base file that is arranged according to the contents of 
key fields contained in the individual records. See also 
arrival sequence access path and access path. 


Keylock feature. A security feature in which a lock and 
key can be used to restrict the use of the display station. 
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keylock switch. A switch on the control panel that can 
be set to one of four different positions by turning it in 
either a clockwise or counterclockwise direction. 


keyword functions. The result of processing DDS 
keywords in a record format specified on an operation. 
See also operation. 


label. (1) The name of a file on a diskette or tape. (2) 
An identifier of a command or program statement gen- 
erally used for branching. 


library. (1) An object on disk that serves as a directory 
to other objects. A library groups related objects, and 
allows the user to find objects by name. (2) The set of 
publications for a system. 


library list. A list that indicates which libraries are to be 
searched and the order in which they are to be searched. 
The system-recognized identifier is *LIBL. 


licensed program. An IBM-written program that per- 
forms functions related to processing user data. 


local. Pertaining to a device, system, or file that is con- 
nected directly or read directly from your system, 
without the use of a communications line. Contrast 
with remote. 


local area network (LAN). The physical connection that 
allows transfer of information among devices located on 
the same premises. 


local controller. A functional unit within the system 
that controls the operation of one or more directly 
attached input/output devices or communications lines. 
Contrast with remote controller. 


local data area. A 1024-byte data area that can be used 
to pass information between programs in a job. A Ssepa- 
rate local data area is automatically created for each 
job. 


local system. For interactive jobs, the system to which 
the display device is directly attached. For batch jobs, 
the system on which the job is being processed. 


local work station. A work station that is connected 
directly to system without need for data transmission 
facilities. Contrast with remote work station. 


lock state. A condition defined for an object that deter- 
mines how it is locked, how it is used (read or write), 
and whether the object can be shared (used by more 
than one job). 


machine interface (MI). The instruction set that tells the 
computer how to operate. 


machine storage pool. A storage pool used by the 
machine and certain highly shared programs, whose size 
is specified in the system value QMCHPOOL. 


main storage. The part of the processing unit where 
programs are run. Contrast with control storage. 


main storage dump space. A section of storage reserved 
on the disk device that is used as a place to save main 
storage for recovery and debugging. 


main storage pool. A division of main storage, which 
allows the user to reserve main storage for processing a 
job or group of jobs, or to use the pools defined by the 
system. Contrast with auxiliary storage pool. 


megabyte. A unit of measure for storage capacity; 
1 megabyte = 1 048 576 bytes. 


message description. Information describing a particular 
message. 


message identifier. A seven-character code that identi- 
fies a predefined message, and is used to get the 
message description from a message file. See predefined 
message. 


message queue. A list on which messages are placed 
when they are sent to a person or program. The 
system-recognized identifier for the object type is 
*MSGQ. 


MI. See machine interface (M1). 


microcode. An instruction or group of instructions 
located in storage or device controllers that controls the 
operation of a device or controller. Microcode cannot 
be called by the contro] program or an application 
program. 


mode. The session limits and common characteristics of 
the sessions associated with advanced-program-to- 
program communications (APPC) devices managed as a 
unit with a remote location. 


mode description. A system object created for advanced- 
program-to-program (APPC) devices that describes the 
session limits and the characteristics of the session, such 
as the maximum number of sessions allowed, maximum 
number of conversations allowed, the pacing value for 
incoming and outgoing request/response units, and other 
controlling information for the session. 


monitor. (1) A functional unit that observes and 
records selected activities for analysis within a data pro- 
cessing system. (2) Devices or programs that observe, 
supervise, control, or verify system operations. 


NAK. See negative acknowledgment (NAK) character. 
negative acknowledgment (NAK) character. The BSC 
transmission control character that indicates that the 


device is not-ready or that an error occurred. 


negative response. In data communications, a reply indi- 
cating that data was not received correctly or that a 


command was incorrect or unacceptable. Contrast with 
positive response. 


network. A collection of data processing products con- 
nected by communications lines for exchanging informa- 
tion between stations. 


network node. A node that can define the paths or 
routes, control route selection, and handle directory ser- 
vices for APPN. 


node. (1) One of the systems or devices in a network. 
(2) A location in a communications network that pro- 
vides host processing services. (3) (X.25) A point where 
packets are received, stored, and forwarded to another 
location (or data terminal equipment) according to a 
routing method defined for the network. (4) (APPN) 
See network node and end node. 


object. A named unit that consists of a set of character- 
istics that describe the object and, in some cases, data. 
An object is anything that exists in and occupies space 
in storage and on which operations can be performed, 
such as programs, files, libraries, and folders. 


object authority. A specific authority that controls what 
a system user can do to an entire object. For example, 
object authority includes deleting, moving, or renaming 
an object. There are seven types of object authorities: 
object operational, object management, object existence, 
all, change, use, and exclude. 


object description. The characteristics (such as name, 
type, and owner name) that describe an object. 


object existence authority. An object authority that 
allows the user to delete the object, free storage of the 
object, save and restore the object, transfer ownership of 
the object, and create an object that was named by an 
authority holder. 


object management authority. An object authority that 
allows the user to specify the authority for the object, 
move or rename the object, and add members to data 
base files. 


object name. The name of an object. Contrast with 
qualified name. 


object operational authority. An object authority that 
allows the user to look at the description of an object 
and use the object as determined by the user’s data 
authorities to the object. See also all authority and use 
authority. 


object owner. A user who creates an object or to whom 
the ownership of an object was reassigned. The object 


owner has complete control over the object. 


odd positive acknowledgment. See ACK1. 
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operating system. A collection of system programs that 
control the overall operation of a computer system. 


operation. The result of processing statements in a high- 
level language. See also keyword functions. 


output. Information or data received from a computer 
that is shown on a display, printed on the printer, or 
stored on disk, diskette, or tape. 


output queue. An object that contains a list of spooled 
files to be written to an output device, such as a printer. 
The system-recognized identifier for the object type is 
*OUTQ. 


owner. The user who creates an object (or is named the 
owner of an object). 


packed decimal format. Representation of a decimal 
value in which each byte within a field represents two 
numeric digits except the far right byte, which contains 
one digit in bits 0 through 3 and the sign in bits 4 
through 7. For all other bytes, bits 0 through 3 repre- 
sent one digit; bits 4 through 7 represent one digit. For 
example, the decimal value + 123 is represented as 0001 
0010 0011 1111. Contrast with zoned decimal format. 


packet. A data transmission information unit. A group 
of data and control characters, transferred as a unit, 
determined by the process of transmission. Commonly 
used data field lengths in packets are 128 or 256 bytes. 


PAG. See process access group (PAG). 


page fault. An error that occurs when a page that is 
marked as not in main storage is referred to by a page 
that is in main storage. 


paging. To move a page of data between main and aux- 
iliary storage. 


parameter. A value supplied to a command or program 
that either is used as input or controls the actions of the 
command or program. 


parameter list. A list of values that provide a means of 
associating addressability of data defined in a called 
program with data in the calling program. It contains 
parameter names and the order in which they are to be 
associated in the calling and called program. 


physical unit. One of three types of network addressable 
units. A physical unit exists in each node of an SNA 
network to manage and monitor the resources (such as 
attached links and adjacent link stations) of a node, as 
requested by an system services control point logical 
unit (SSCP-LU) session. 


pool. A division of main or auxiliary storage. See also 
base pool, storage pool. 
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positive response. A response indicating that a request 
arrived and was successfully received and processed. 
Contrast with negative response. See also definite 
response. 


power down. An AS/400 command to turn the power 
off and bring an orderly end to system operation. 


predefined message. A message whose description is 
created and stored in a message file before it is sent by 
the program. 


primary focal point. A network node that receives alerts 
from nodes that the user has defined in a sphere of 
control. Contrast with default focal point. 


print queue. A list of output waiting to be printed by 
the system, 


print writer. A function of the operating system that 
writes the spooled output from a program to a printer. 
See also diskette writer and spooling writer. 


printer file. A device file created by the user to support 
a printer device. 


private authority. The authority specifically given toa 
user for an object that overrides any other authorities, 
such as the authority of a user’s group profile or an 
authorization list. Contrast with public authority. 


process access group (PAG). A group of objects that is 
primarily paged in and out of storage in a single opera- 
tion when a job (process) enters a long wait. 


processing. The action of performing operations and 
calculations on data. 


processing unit. The part of the system that performs 
instructions and contains main storage. 


profile. Data that describes the characteristics of a user, 
program, device, or remote location. 


program message queue. An object used to hold mes- 
sages that are sent between program calls of a routing 
step. The program message queue is part of the job 
message queue. 


programmer subsystem. An IBM-supplied interactive 
subsystem used to code programs on a display station. 
The system object name is QPGMR. 


programmer user profile. The system-supplied user 
profile that has the authority necessary for system and 
application programmers and the special authorities of 
save system authority and job control authority. 
Named QPGMR. 


protocol. A set of rules controlling the communication 
and transfer of data between two or more devices in a 
communications system. 


PU. See physical unit. 


public authority. The authority given to users who do 
not have any specific (private) authority to an object, 
who are not on the authorization list (if one is specified 
for the object), and whose group profile has no specific 
authority to the object. Contrast with private authority. 


purge. An attribute that specifies whether a job is to be 
marked eligible to be moved out of main storage into 
auxiliary storage at the end of a time slice or when 
entering a long wait. 


QCMD. The 1BM-supplied control language processor 
that interprets and processes CL commands for the 
system. 


QGPL. See general-purpose library. 


qualified job name. A job name and its associated user 
name and a system-assigned job number. Contrast with 
job name. 


qualified name. The name of the library containing the 
object and the name of the object. Contrast with object 
name. 


qualifier. In data processing, all names in a qualified 
name other than the far right, which is called the simple 
name. 


random processing. A method of processing in which 
records can be read from, written to, or deleted from a 
file order requested by the program that is using them. 
See also consecutive processing and sequential 
processing. 


read authority. A data authority that allows the user to 
look at the contents of an entry in an object or to runa 
program. See also add authority, delete authority, and 
update authority. 


read/write head. The data sensing and recording unit of 
the diskette drive or tape drive. 


reader. An internal program that reads jobs from an 
input device or a data base file and places them on a job 
queue. 


recursion. An operation done in several steps, with each 
step using the output of the previous step. 


recursion level. The position of a program in a list of 
programs called by the first program and any following 
programs. The first occurrence of a program in a job 
has a recursion level of 1, the second occurrence of the 
same program has a recursion level of 2, and so on. 


recursive. Pertaining to a program or routine that calls 
itself after each run until it is interrupted. 


recursive procedure. An active procedure that can be 
called from within itself or from within another active 
procedure. 


recursive program. A program that can call itself, or be 
called by another program, and repeat indefinitely until 
a specified condition is met. 


release-program-device operation. An operation that 
makes a program device not available for input/output 
operations. Contrast with acquire-program-device opera- 
tion. 


remote. Pertaining to a device, system, or file that is 
connected to another device, system, or file through a 
communications line. Contrast with local. 


remote controller. A device or system, attached to a 
communications line, that controls the operation of one 
or more remote devices. Contrast with local controller. 


remote device. A device whose controller is connected 
to an AS/400 system by a communications line. 


remote work station. A work station that is connected 
to the system by data communications. Contrast with 
local work station. 


request header. A 3-byte header preceding a request 
unit. Abbreviated RH. See request/response header. 
Contrast with response header. 


request unit (RU). The record transmitted to the other 
system. This record can contain a request, data, or 
both. Contrast with response unit (RU). 


request/response header. Control information preceding 
a request/response unit that specifies the type of 
request/response unit and contains control information 
associated with that request/response unit. Abbreviated 
RH. See also request unit (RU). 


request/response unit (RU). A combined term to iden- 
tify a request unit or a response unit. 


resource. Any part of the system required by a job or 
task, including main storage, devices, the processing 
unit, programs, files, libraries, and folders. 


response header. A header, optionally followed by a 
response unit, that indicates whether the response is 
positive or negative and that may contain a pacing 
response. Abbreviated RH. See request/response header 
and request header. See also negative response and posi- 
tive response. 


response unit (RU). The record sent to respond to a 
request. The response can be either positive or negative 
and can include control information. Contrast with 
request unit (RU). 
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routing. The list of users who are to receive an item 
when it is distributed, including all users named specif- 
ically and those users named on distribution lists by the 
sender. 


routing entry. An entry in a subsystem description that 
specifies the program to be called to control a routing 
step that runs in the subsystem. 


routing step. The processing that results from running a 
program specified in a routing entry. Most jobs have 
only one routing step. 


RU. See request unit or response unit (RU). 


RU chain. A set of related request/response units that 
are transmitted consecutively on a particular normal or 
expedited data flow. See also bracket. 


save system authority. A special authority that allows 
the user to save and restore all objects on the system 
and free storage of all objects on the system. See also 
all object authority, job control authority, security admin- 
istrator authority, service authority, and spool control 
authority. 


security administrator authority. A special authority 
that allows a user to add users to the system distribution 
directory, to create and change user profiles, to add and 
remove access codes, and to perform office tasks, such 
as delete documents, folders, and document lists, and 
change distribution lists for other users. See also all 
object authority, save system authority, job control 
authority, service authority, and spool control authority. 


security officer. A person assigned to control all of the 
security authorizations provided with the system. A 
security officer can, for example, remove password or 
resource security; or add, change, or remove security 
information about any system user. 


sequence number. (1) The number of a record that iden- 
tifies the record within the source member. (2) A field 
in a journal entry that contains a number assigned by 
the system. This number is initially 1 and is increased 
by | until the journal is changed or the sequence 
number is reset by the user. 


sequential processing. A method of processing in which 
records are read, written to, or deleted in the order 
determined by the value of the key field. See also con- 
secutive processing and random processing. 


service authority. A special authority that allows the 
user to perform the alter function in the service func- 
tions. See also all object authority, save system 
authority, job control authority, security administrator 
authority, and spool control authority. 


session. (1) The length of time that starts when a user 


signs on and ends when the user signs off at a display 
station. (2) In communications, the logical connection 
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by which a program or device can communicate with a 
program or device at a remote location. (3) (SNA) A 
logical connection between two network locations that 
can be started, tailored to provide various connection 
protocols, and stopped, as requested. Each session is 
uniquely identified in a header by a pair of network 
addresses, identifying the origin and destination of any 
transmissions exchanged during the session. 


SNA distribution services (SNADS). An IBM architec- 
ture that defines a set of rules to receive, route, and 
send electronic mail in a network of systems. 


SNADS. See SNA distribution services (SNADS). 


source file. (1) A file of programming code that is not 
compiled into machine language. Contrast with data 
file. (2) A file created by the specification of 
FILETYPE(*SRC) on the Create command. A source file 
can contain source statements for such items as high- 
level language programs and data description specifica- 
tions. 


source system. The system that issues a request to 
establish communications with another system. (DDM) 
The system on which an application program issues a 
request to use a remote file. Contrast with target 
system. 


special authority. The types of authority a user can 
have to perform system functions, including all object 
authority, save system authority, job control authority, 
security administrator authority, spool control authority, 
and service authority. Contrast with specific authority. 


specific authority. The types of authority a user can be 
given to use the system resources, including object 
authorities and data authorities. See also object 
authority and data authority. Contrast with special 
authority. 


spool. The system function of putting jobs into a 
storage area to wait to be printed or processed. 


spool control authority. A special authority that allows 
the user to perform spooling functions, such as display, 
delete, hold, and release spooled files on the output 
queue for himself and other users. This authority also 
allows the user to change the spooled file attributes, 
such as the printer used to print the file. See also all 
object authority, save system authority, job control 
authority, security administrator authority, and service 
authority. 


spooled file. A file that holds output data waiting to be 
printed, or input data waiting to be processed by the 
program. 


spooled input file. See inline data file. 


spooled output file. A file that causes output data to be 
held for later printing. 


spooling. The system function that saves data in a disk 
file for later processing or printing. 


spooling subsystem. A part of the system that provides 
the operating environment for the programs that read 
jobs onto job queues to wait for processing and write 
files from an output queue to an output device. IBM 
supplies one spooling subsystem: QSPL. 


spooling writer. The generic name to refer to the func- 
tion of the diskette writer and print writer. 


SSCP. See system services control point (SSCP). 


SSCP ID. A number uniquely identifying a system ser- 
vices control point. The SSCP ID is used in requests sent 
to physical units and to other system services control 
points. 


storage pool. A logical division of storage reserved for 
processing a job or group of jobs. 


store. To put or keep data in a storage device. 


subsystem. An operating environment, defined by a 
subsystem description, where the system coordinates 
processing and resources. 


synchronous data link control (SDLC). A form of com- 
munications line control that uses commands to control 
the transfer of data over a communications line. 


synchronous processing. A series of operations that are 
done as part of the job in which they were requested; 
for example, calling a program in an interactive job at a 
work station. Contrast with asynchronous processing. 


system ASP. The auxiliary storage pool where system 
programs and data reside. It is the storage pool used if 
a storage pool is not defined by the user. See also aux- 
iliary storage pool and user ASP. 


system configuration. A process that specifies the 
machines, devices, and programs that form a particular 
data processing system. 


system date. The date assigned in the system values 
when the system is started. See also creation date, and 
job date. 


system library. The library shipped with the system that 
contains objects, such as authorization lists and device 
descriptions created by a user; and the licensed pro- 
grams, system commands, and any other system objects 
shipped with the system. The system identifier is QSys. 


system object. One of two machine object classifica- 
tions. Any of the machine objects shipped with the 
system or any of the operating system objects created by 
the system. 


system pointer. A pointer that contains addressability to 
a machine interface system object. 


system services control point (SSCP). A focal point 
within an SNA network for managing the other systems 
and devices, coordinating network operator requests and 
problem analysis requests, and providing directory 
routing and other session services for network users. 


target. (1) In advanced program-to-program communi- 
cations, the program or system to which a request for 
processing is sent. (2) (DDM) The remote system where 
the request for a file is sent. 


target system. In a distributed data management (DDM) 
network, the system that receives a request from an 
application program on another system to use one or 
more files located on the target system. Contrast with 
source system. 


time slice. The amount of processor time (specified in 
milliseconds) allowed for a routing step before other 
waiting routing steps are allowed to process data. 


token-ring network. A local area network that sends 
data in one direction throughout a specified number of 
locations by using the symbol of authority for control of 
the transmission line, called a token, to allow any 
sending station in the network (ring) to send data when 
the token arrives at that location. 


transaction. In communications, an exchange between a 
program on a local system and a program on a remote 
system that accomplishes a particular action or result. 
See also conversation and session. 


TRLAN. Abbreviation in the commands, parameters, 
and options for IBM Token-Ring Network. See also 
token-ring network. 


uninterruptible power supply. A source of power from a 
battery installed between the commercial power and the 
system that keeps the system running, if a commercial 
power failure occurs, until it can complete an orderly 
end to system processing. 


update authority. A data authority that allows the user 
to change the data in an object, such as a journal, a 
message queue, or a data area. See also add authority, 
delete authority, and read authority. 


use authority. An object authority that allows the user 
to run a program or display the contents of a file. Use 
authority combines object operational authority and 
read authority. 


user ASP. One or more auxiliary storage pools used to 
isolate journals, journal receivers, and save files from 
the other system objects stored in the system ASP. See 
also auxiliary storage pool and system ASP. 


user ID. See user identification (user ID). 
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user ID/address. The two-part network name used in 
the system distribution directory and in the office appli- 
cations to uniquely identify a user and send electronic 
mail. 


user identification (user ID). (1) The name used to asso- 
ciate the user profile with a user when a user signs on 
the system. See also user profile name. (2) The first 
part of a two-part network name used in the system dis- 
tribution directory and in the office applications to 
uniquely identify a user. The network name is usually 
the same as the user profile name, but does not need to 
be. 


user profile. An object with a unique name that con- 
tains the user’s password, the list of special authorities 
assigned to a user, and the objects the user owns. It is 
used by the system to verify the user’s authorization to 
read or use objects, such as files or devices, to run the 
jobs on the system. 


user profile name. The name or code that the system 
associates with a user when he or she signs on the 
system. Also known as user ID. 


work entry. An entry in a subsystem description that 
specifies the source from which jobs can be accepted for 
processing in the subsystem. 


work station. A device used to transmit information to 
or receive information from a computer; for example, a 


display station or printer. 


work station address. (1) A number used in a config- 
uration file to identify a work station attached to a com- 
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puter port. (2) The address to which the switches on a 
work station are set, or the internal address assumed by 
the system, if no address is specified. 


’ 
work station controller. An 1/0 controller card in the 
card enclosure that provides the direct connection of 
local work stations to the system. 


work station entry. An entry in a subsystem description 
that specifies the work stations from which users can 
sign on to the subsystem or from which interactive jobs 
can transfer to the subsystem. 


work station user profile. The system-supplied user 
profile that has the authority required by work station 
operators. Named QUSER. 


writer. (1) The part of the operating system spooling 
support that writes spooled output to an output device 
independently of the program that produced the output. 
(2) (RJE) A program that receives output data (files) 
from the host system. 


X.25. In data communications, a specification of the 
CCITT that defines the interface to an X.25 (packet- 
switching) network. 


zoned decimal format. A format for representing 
numbers in which the digit is contained in bits 4 through 
7 and the sign is contained in bits 0 through 3 of the far 
right byte; bits 0 through 3 of all other bytes contain Is 
(hex F). For example, in zoned decimal format, the 
decimal value of + 123 is represented as 1111 0001 1111 
0010 1111 0011. Same as unpacked decimal format. 
Contrast with packed decimal format. 
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specialized tuning 5-20 
Submit Data Base Job (SBMDBJOB) 
command 2-18 
Submit Diskette Job (SBMDKTJOB) 
command 2-18 
time slice 5-9 
using PURGE parameter 5-6 
performance data 
collecting 6-1, 6-2 
preparation for 6-1 
files, content of 6-8 
QAPMASYN file 6-29 
QAPMBSC file 6-30 
QAPMCIOP file 6-39 
QAPMCOMF file 6-9 


performance data (continued) 
QAPMDIOP file 6-41 
QAPMDISK file 6-22 
QAPMECIL file 6-36 
QAPMHDLC file 6-27 
QAPMJOBS file 6-19 
QAPMLIOP file 6-44 
QAPMPOOL file 6-26 
QAPMRESP file 6-46 
QAPMSYS file 6-10 
QAPMX25 file 6-33 
system and communications, collecting 6-2 
system, collecting 6-2 
trace, collecting 6-2 
pool 
multiple 5-21, 5-22 
pool configuration 
choosing your 5-17 
pool size 
*BASE 5-18 
adjusting 5-19 
machine 5-15 
QSPL 5-17 


powering down system in unattended environment 4-6 


printer file accounting 8-3 
priority, running 
changing 2-16, 4-9 
process access group 5-5 
transfer 5-6 
processing unit 
maximum time 2-15 
program start request 1-5 
programmer output queue, creating 4-4 
programming examples 


submitting a job using parameters from a display 


file 2-39 
time-dependent scheduling 4-11 
purge 


description 2-15 
PURGE parameter 5-6 
on interactive job 5-21 


Q 


QABNORMSW system value 7-3 
QACGLVL system value 7-25 
initial 7-5 
QACTJOB system value 
description 7-22 
initial 7-5 
lower limit 7-22 
QADLACTJ system value 
description 7-23 
initial 7-5 
lower limit 7-23 
QADLSPLA system value 
description 7-23 
initial 7-5 
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QADLSPLA system value (continued) 
lower limit 7-23 
QADLTOTJ system value 
description 7-23 
initial 7-5 
lower limit 7-23 
QAUTOCKG system value_ 1-8, 7-11 
initial 7-3 
QBASACTLVL system value 
description 7-26 
initial 7-6 
lower limit 7-26 
QBASE 
description of controlling subsystem 1-7 
QBASE subsystem 1-9 
QBASPOOL system value 
See also base storage pool 
description 7-26 
initial 7-6 
QBATCH 
use of shipped objects for batch jobs 1-18 
QBATCH subsystem 1-9 
QCHRID system value 
description 7-11 
initial 7-11 
QCL (command processor) 
considerations for using, for interactive jobs 2-30 
QCMD (command processor) 
description 1-7 
routing to, based on work station 2-25 
using to control routing step for batch job 2-32 
QCMN subsystem 1-9 
QCMNRCYLMT system value 7-12 
QCONSOLE system value 
initial 7-3 
QCTL subsystem 1-9 
QCTLSBSD system value_ 1-8 
description 7-12 
initial 7-3 
QCURSYM system value 
description 7-10 
initial 7-2 
QDATE system value 7-8 
initial 7-2 
QDATFMT system value 
description 7-10 
initial 7-2 
QDATSEP system value 
description 7-10 
initial 7-2 
QDAY system value 7-8 
initial 7-2 
QDBRCVYWT system value 
description 7-13 
initial 7-3 
QDECFMT system value 
description 7-10 
initial 7-2 
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QDEVNAMING system value 1-8, 7-13 
QHOUR system value 7-9 
initial 7-2 
QHST messages, contrasted with job accounting 8-6 
QHSTLOGSIZ system value 
description 7-25 
initial 7-5 
lower limit 7-25 
QIGC system value 7-3, 7-13 
QINTER 
activity level for 5-18 
prevent sign on prompt from being displayed 4-8 
subsystem 
See also subsystem 
used for security officer sign-on 1-13 
QINTER subsystem 1-9 
QIPLDATTIM system value 7-13 
initial 7-3 
QIPLSTS system value 7-3, 7-14 
QIPLTUNE 5-14 
QIPLTYPE system value 1-8, 7-14 
initial 7-3 
QJOBMSGQSZ system value 
description 7-24 
initial 7-5 
lower limit 7-24 
QJOBMSGOQTL system value 
description 7-24 
initial 7-5 
lower limit 7-24 
QJOBSPLA system value 
description 
initial 7-5 
lower limit 
QKBDTYPE system value 
description 7-14 
initial 7-3 
QLEAPADJ 7-8 
QLEAPADJ system value 
initial 7-2 
QLUS system job 1-21 
QMAXACTLVL system value 
description 7-26 
initial 7-6 
lower limit 7-26 
QMAXSIGN system value 7-15 
QMCHPOOL system value 
See also machine storage pool 
description 7-27 


initial 7-6 

QMINUTE system value 7-9 
initial 7-2 

QMONTH system value 7-8 
initial 7-2 


QPFRADJ system value 7-16 

QPGMR user profile 1-2 

QPRTDEYV system value 7-3, 7-16 
initial 7-3 


QPRTTXT system value 
description 7-25 
initial 7-5 
QPWRDWNLMT system value 
description 7-17 
initial 7-3 
lower limit 7-17 
QPWRRSTIPL system value 7-17 


initial 7-3 
QRMTIPL system value 7-17 
initial 7-3 


QSCPFCONS system value 
description 7-17 
initial 7-3 
QSECOER user profile 1-2 
QSECOND system value 7-9 
initial 7-2 
QSECURITY system value 1-8, 7-17 
QSPCENYV system value 1-8, 7-18 
QSPL 
activity level 5-17 
pool size 5-17 
use of shipped objects for spooling jobs 1-20 
QSPL subsystem 1-9 
QSRLNBR system value 7-18 
QSRVDMP system value 7-26 
initial 7-5 
QSTRPRTWTR system value 7-19 
initial 7-3 
QSTRUPPGM system value 7-18 
initial 7-3 
QSYSARB 2-9 
QSYSLIBL system value 
description 7-22 
initial 7-5 
QSYSOPR user profile 1-2 
QTIME system value 7-9 
initial 7-2 
QTOTJOB system value 
description 7-24 
initial 7-5 
lower limit 7-24 
qualified job name _ 1-14 


queue 
ineligible 5-7 
output 2-19 


QUPSDLYTIM system value 7-19 
description 7-20 

QUPSMSGQ system value 
description 7-21 

QUSER user profile 

QUSRLIBL system value 
description 7-22 


initial 7-5 
QYEAR system value 7-8 
initial 7-2 


R 
RAR network attribute 7-28 
recovery considerations 
time-dependent scheduling 4-16 
Remove Autostart Job Entry (RMVAJE) command 2-3 
Remove Job Queue Entry (RMVJOBQE) command 2-3 
Remove Routing Entry (RMVRTGE) command 2-3 
Remove Work Station Entry (RMVWSE) command 2-3 
request data 
description 2-33 
example of using 4-3 
in job description 2-14 
Reroute Job (RRTJOB) command 
reasons for rerouting 2-43 
use 1-5 
rerouting jobs 2-43 
resource accounting 8-2, 8-8 
Retrieve Group Attributes (RTVGRPA) command, 
example 3-6 
Retrieve Network Attributes (RTVNETA) 
command 7-29 
Retrieve System Value (RTVSYSVAL) command 
use 7-1 
retrieving 
system value 7-1 
RMVAJE (Remove Autostart Job Entry) command 2-3 
RMVJOBQE (Remove Job Queue Entry) command 2-3 
RMVRTGE (Remove Routing Entry) command 2-3 
RMVWSE (Remove Work Station Entry) command 2-3 
routing based on communications program start request 
based on communications program start 
request 2-29 
routing data 
See also routing entry, routing keywords, routing 
step 
description 1-5 
example of using 4-2 
for batch jobs 1-18 
in job description 2-14 
specifying 2-24 
routing directly to user program 
based on user 2-27 
based on work station 2-28 
to control job submitted using SBMJOB 
command 2-34 
routing entry 
See also routing data, routing step 
activity level 2-45 
adding 2-48 
contents 2-12 
description 1-3, 2-12 
routing step 
See also routing data, routing entry 
activity for display of command entry display 1-15 
description 1-3 
for batch jobs 1-18 
relationship to parts of a subsystem description 1-5 
starting 1-5 
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routing step (continued) 
using QCMD to control 2-32 
where run 1-6 
routing to QCMD 
based on work station 2-25 
to control job submitted through spooling 
reader 2-32 
RQSDTA parameter 
using a variable on 2-38 
RRTJOB (Reroute Job) command 
reasons for rerouting 2-43 
use 1-5 
RTVGRPA (Retrieve Group Attributes) command 3-6 
RTVNETA (Retrieve Network Attributes) 
command 7-29 
RTVSYSVAL (Retrieve System Value) command 
use 7-1 


S 


sample commands 
SBMTIMJOB 4-12, 4-23 
SNDTIMMSG 4-11, 4-18 
SBMDBJOB (Submit Data Base Jobs) command 1-19, 
2-17 
SBMDKTJOB (Submit Diskette Job) command 1-19, 
2-17 
SBMJOB (Submit job) command 
example 2-37 
use 1-19, 2-37 
scheduling priority 2-14 
security considerations 
time-dependent scheduling 4-16 
security considerations with job description 
autostart jobs 2-52 
batch jobs 2-51 
communications job 2-52 
interactive job 2-51 
security officer 
sign-on 1-12 
Set Attention Program (SETATNPGM) command 3-9 
SETATNPGM (Set Attention Program) command 3-9 
setting up job accounting 8-14 
shared storage pool 1-6 
shipped system characteristics 1-7 
sign-off, preventing 4-3 
sign-on display file 
changing 2-11 
signing on 
controlling 4-1 
under QSECOFR user profile 1-12 
under security officer user profile 1-12 
under work station user profile 1-10 
with SECOFR password 1-12 
SNA network attributes 
JOBACN 7-29 
MAXHOP_ 7-29 
MSGQ_ 7-29 
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SNA network attributes (continued) 
OUTQ 7-29 
special authority 
*JOBCTL 2-16 
spooling jobs 
description 1-2 
queues used 2-17 
use of shipped objects 1-20 
spooling subsystem 
how job queue is identified 1-20 
placing jobs on a job queue _ 1-20 
Start Performance Monitor (STRPFRMON) 
command 6-2 
Start Subsystem (STRSBS) command 1-6 
starting a routing step 1-5 
starting a subsystem 1-6 
starting line numbers, variable 1-7 
state 
key/think wait 5-4 
long wait 5-3 
short wait 5-3 
storage pool 5-5 
See also base storage pool, machine storage pool 
activity level 
description 1-6, 2-45 
definitions 2-4 
description 1-6 
for routing step running 1-6 
maximum number 1-6 
size 1-6 
storage system values 7-26 
STRPFRMON (Start Performance Monitor) 
command 6-2 
STRSBS (Start Subsystem) command 1-6 
Submit Data Base Jobs (SBMDBJOB) command 1-19, 
2-17 
Submit Diskette Jobs (SBMDKTJOB) command 1-19, 
2-17 
Submit Job (SBMJOB) command 
compared to SBMxxxJOB commands 2-17 
example 2-37 
use 1-19, 2-37 
using CALL command as request data 2-38 
submitting a batch job from another job 2-37 
submitting a job using parameters from a display 
file 2-39 
subsystem 
See also batch subsystem, controlling subsystem, 
interactive subsystem, spooling subsystem 
activity 
creation of a job for security officer 1-13 
display of command entry display 1-15 
display of program call menu 1-10 
starting a routing step 1-15 
activity level 
description 2-45 
controlling 
See also QBASE 
as shipped by IBM _ 1-7 


subsystem (continued) system control program in base pool 2-4 


controlling (continued) system data 
cC changing 2-47 collecting 6-2 
description 1-7 collecting only 6-2 
creating system job 
controlling 2-47 QLUS 1-21 


interactive example 2-48 
defining another controlling 2-47 
description of 1-3 


system menu 1-7 
system name (SYSNAME network attribute) 
description 7-28 


ending a_ 1-6 system value 
examples 2-48 accessing in CL program 7-1 
QBASE 1-9 allocation 7-22 
QBATCH 1-9 changing 7-7 
QCMN 1-9 date 7-8 
QCTL 1-9 description 1-3 
QINTER 1-9 displaying 7-6 
QSPL 1-9 editing 7-10 
starting a 1-6 initial values 7-2 
subsystem configurations library list 7-22 
c shipped 1-9 lists 7-1 


subsystem description 
See also object, QBASE, QBATCH, QCTL, 
QINTER, QSPL 
attributes 2-3 
changing 2-3 
class, relationship to 2-21 
contents 2-3 
creating for nighttime jobs 4-6 
defining storage pools 2-3 


deleting 2-3 
¢ description 1-3 


logging 7-25 

message 7-25 
QABNORMSW 7-3, 7-11 
QACGLVL 7-5, 7-25 
QACTIJOB 7-5, 7-22 
QADLACT] — 7-5, 7-23 
QADLSPLA 7-5, 7-23 
QADLTOTJ 7-5, 7-23 
QAUTOCFG 1-8, 7-3, 7-11 
QBASACTLVL _ 7-6, 7-26 
QBASPOOL 7-6, 7-26 


displaying 2-3 

job description, relationship to 2-21 
relationship of commands used 2-20 
storage pool definitions 2-3 


summaries 


controls on activity levels 2-45 
effect of shipped objects on the system 
work management concepts and terms 


-17 


1 
1-2 


SYSNAME network attribute 7-28 
system 


See also system value 

activity level 2-45 

control system values 
QABNORMSW_ 7-3 
QCTLSBSD 7-12 
QDBRCVYWT 7-13 
QIPLSTS 7-3 
QPFRADJ 7-3 
QPWRDWNLMT 7-17 
QSCPFCONS_ 7-17 


date 
description 7-8 
format 7-8 
decimal format 7-3 
time 7-9 


system arbiter 2-9 


QCHRID 7-3, 7-11 
QCMNRCYLMT 7-3, 7-12 
QCONSOLE 7-3, 7-12 
QCTLSBSD 1-8, 7-3, 7-12 
QCURSYM_ 7-2, 7-10 
QDATE 7-2, 7-8 
QDATFMT 7-2, 7-10 
QDATSEP 7-2, 7-10 
QDAY 7-2, 7-8 
QDBRCVYWT 7-3, 7-13 
QDECFMT 7-2, 7-10 
QDEVNAMING 1-8, 7-3, 7-13 
QHOUR 7-2, 7-9 
QHSTLOGSIZ 7-5, 7-25 
QIGC 7-3, 7-13 
QIPLDATTIM 7-3, 7-13 
QIPLSTS 7-3, 7-11, 7-14 
QIPLTUNE 5-14 
QIPLTYPE 1-8, 7-3, 7-14 
QJOBMSGQSZ 7-5, 7-24 
QJOBMSGQTL 7-5, 7-24 
QJOBSPLA 7-5, 7-24 
QKBDTYPE 7-3, 7-14 
QLEAPADJ 7-2, 7-8 
QMAXACTLVL 7-6, 7-26 
QMAXSIGN 7-3, 7-15 
QMCHPOOL 7-6, 7-27 
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system value (continued) trace data 


QMINUTE 7-2, 7-9 collecting 6-2 

QMONTH 7-2, 7-8 dumping 6-3 

QPFRADJ 7-3, 7-16 trace table, internal 6-3 
QPRTDEV 7-3, 7-16 Transfer Job (TFRJOB) command 
QPRTITXT 7-5, 7-25 description of using 2-43 
QPWRDWNLMT 7-3, 7-17 use of 1-5 

QPWRRSTIPL 7-3, 7-17 Transfer to Group Job (TFRGRPJOB) command 3-3 
QRMTIPL 7-3, 7-17 transferring a job 2-43 
QSCPFCONS 7-3, 7-17 tuning 

QSECOND 7-2, 7-9 basic 5-14 

QSECURITY 1-8, 7-3, 7-17 IPL 5-14 

QSPCENV 1-8, 7-3, 7-18 specialized 5-20 


QSRLNBR_ 7-3, 7-18 
QSRVDMP_ 7-5, 7-26 

QSTRPRTWTR_ 7-3, 7-19 U 
QSTRUPPGM 7-3, 7-18 


QSYSLIBL 7-5, 7-22 user profile 
QTIME 7-2, 7-9 QPGMR 1-2 
QTOTIJOB 7-5, 7-24 QSECOFR 1-2 
QUPSDLYTIM 7-3, 7-19, 7-20 QSYSOPR_ 1-2 
QUPSMSGQ _ 7-3, 7-21 QUSER 1-2 
QUSRLIBL 7-5, 7-22 use with work management 1-7 
QYEAR 7-2, 7-8 using initial menuin 4-2 
retrieving 7-1 using initial program in 4-2 
summary 7-1 user-defined storage pools 
system control 7-12 activity level 2-45 
time 7-9 description 2-4 
using 7-1 

system, characteristics of shipped V 


description 1-1, 1-7 

summary of effect on a running system 1-17 
use for batch jobs 1-18 

use for interactive jobs 1-10 W 
use for spooling jobs 1-20 


unattended environment, setting up 4-6 


validity-checking, job accounting 8-20 


wait state 


work management objects 1-10 key/think 5-4 


long 5-3 
T short 5-3 


temporary storage, maximum 2-15 


wait time (DFTWAIT parameter) 2-15 


Test Request key 2-49 work entry — , os 
TFRGRPJOB (Transfer to Group Job) command 3-3 autostart job entry <- 


TFRJOB (Transfer Job) command 
description of using 2-43 
use of 1-5 
time slice 5-9 
changing for duration of aCL command 4-9 
description 2-15 
time stamp 


description 1-4 

job queue entry 2-7 

work station entry 2-7 
work management 

See also performance tuning 

Attention by handling 3-1 

characteristics of the shipped system 


spooled files 2-17 concepts and terms 1-2 


time system values 7-9 
time-dependent scheduling 4-11 


ending 4-32 introduction 1-1 


recovery considerations 4-16 
SBMTIMJOB sample command 4-12, 4-23 
security considerations 4-16 

SNDTIMMSG sample command 4-11, 4-18 


objects 


changes to IBM-shipped 2-3 
examples of changing 4-4 
shipped with the system 1-7 
summary of 2-20 


overview 1-1 
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1-7 


effect of shipped objects on a running system 
group jobs 3-1 


1-17 


work management (continued) 
structure 1-2 
summary of concepts and terms 1-2 
using functions 
creating subsystems 2-47 
description 2-3 
using shipped objects 
for programmer sign-on 1-12 
for work station user to sign on 1-7 
work station entry 
activity level 2-45 
adding 2-48 
contents 2-7 
description 1-4 
work station type entry 
activity level 2-45 
contents 2-7 
work station user 
signing on 1-7 
Work with Active Jobs (WRKACTJOB) command 5-13 
Work with Job Queue (WRKJOBQ) command 2-50 
Work with Output Queue (WRKOUTQ) command 2-50 
Work with Subsystem Descriptions (WRKSBSD) 
command 2-4 
Work with System Status (WRKSYSSTS) 
command 5-10 
WRKACTJOB (Work with Active Jobs) command 5-13 
WRKJOBQ (Work with Job Queue) command 2-50 
WRKOUTQ (Work with Output Queue) command 2-50 
WRKSBSD (Work with Subsystem Descriptions) 
command 2-4 
WRKSYSSTS (Work with System Status) 
command 5-10 
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